小编joh*_*hnl的帖子

我不知道为什么,但我很确定以下确实会产生一段时间的情节.你能告诉我这里有什么问题吗？

library(ggplot2)
qplot(c(0, 2), stat="function", fun=exp, geom="line") 

这将返回"c(0,2)中的错误:未使用的参数(2)." 为什么？

编辑:这是一个普遍的问题:

a <- c(0, 2)

给出了同样的错误.这里发生了什么？

 library(data.table)
 DT1 <- data.table(num = 1:6, group = c("A", "B", "B", "B", "A", "C"))
 DT2 <- data.table(group = c("A", "B", "C"))

我想将列添加popular到DT2与价值TRUE,每当DT2$group被包含在DT1$group至少两次.所以,在上面的例子中,DT2应该是

    group popular
 1:     A    TRUE
 2:     B    TRUE
 3:     C   FALSE

什么是有效的方法来达到这个目的？

更新的示例: DT2实际上可能包含更多的组DT1,所以这是一个更新的示例:

 DT1 <- data.table(num = 1:6, group = c("A", "B", "B", "B", "A", "C"))
 DT2 <- data.table(group = c("A", "B", "C", "D"))

并且期望的输出将是

    group popular
 1:     A    TRUE
 2:     B …

假设我有一组部分重叠的间隔

require(lubridate)
date1 <- as.POSIXct("2000-03-08 01:59:59")
date2 <- as.POSIXct("2001-02-29 12:00:00")
date3 <- as.POSIXct("1999-03-08 01:59:59")
date4 <- as.POSIXct("2002-02-29 12:00:00")
date5 <- as.POSIXct("2000-03-08 01:59:59")
date6 <- as.POSIXct("2004-02-29 12:00:00")
int1 <- new_interval(date1, date2)
int2 <- new_interval(date3, date4)
int3 <- new_interval(date5, date6)

有没有人知道如何构建一个时间序列图,为每个时间点提供该点重叠间隔的数量？

因此,例如,采用上面的例子:对于2000年1月的给定日期,我正在寻找的函数将返回值"1"(日期仅在其中int2),而对于2001年1月的日期,它将返回"3"(因为该日期在int1,int2并且int3).等等.

有任何想法吗？