小编pet*_*arp的帖子

为什么两个功能fn和gn以下不同？我不认为他们应该,但我必须遗漏一些东西.

vars <- letters[1:10]
a <- b <- 1
fn <- function (d) {
    sapply( vars, exists )
}
gn <- function (d) {
    sapply( vars, function (x) { exists(x) } )
}
fn(d=2)
#    a     b     c     d     e     f     g     h     i     j 
# TRUE  TRUE  TRUE FALSE FALSE FALSE FALSE FALSE  TRUE FALSE 
gn(d=2)
#    a     b     c     d     e     f     g     h     i     j 
# TRUE  TRUE  TRUE  TRUE FALSE FALSE FALSE …

我有一个可能重叠区间的端点列表,我想要一种有效的方法来计算k区间所覆盖的总面积k=1,2,... (不进行所有成对比较).或者,这不可能吗？

例如,假设x是起点列表,y是终点列表,并且x[i] < y[i],和

x = (1.5, 2, 3, 5)
y = (3, 4, 4, 6)

使得至少一个区间所覆盖的总面积为3.5,并且至少两个区域所覆盖的总面积为1.

谢谢,ph.