R中的过期日期差距

Question

我正在使用R并且有一个日期向量作为日期（DOY），其中有几天缺失。我想找到这些失踪日子的地方。

DOY <- c(1,2,5,6,7,10,15,16,17)

我想要一个输出，告诉我错过的日子是在白天之间：

2 to 5 
7 to 10
10 to 15

（或这些地点的指数）

Answer 1

rDOY <- range(DOY); 
rnDOY <- seq(rDOY[1],rDOY[2]) 
rnDOY[!rnDOY %in% DOY]
[1]  3  4  8  9 11 12 13 14

相反，如果你不想要缺少的日子，并做缺失项目的开头和结尾：

> DOY[ diff(DOY)!=1]
[1]  2  7 10
> DOY[-1] [ diff(DOY)!=1]
[1]  5 10 15