參照上一行r使用

Question

有沒有辦法來引用上一行apply的R中？

例如，我在data.frame日期的順序排序，我想找到以前的行和當前行的日期之間的差異。這在循環中很容易。

for(i in 2:nrow(Y)) { 
     Y[i,]$window = as.numeric(as.Date(Y[i, ]$start_date) - 
         as.Date(Y[i-1, ]$end_date)) 
} 

我可以使用apply嗎？

Answer 1

嘗試使用head（或tail）

Y$window <- as.numeric(c(NA, as.Date(tail(y$start.date,-1)) - as.Date(head(y$end.date,-1))))