在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