我试图使用dplyr来改变包含变量的相同组滞后的列以及其他组(一个)的滞后.编辑:对不起,在第一版中,我通过在最后一秒按日期重新排列来搞砸了订单.
这就是我想要的结果:
library(tidyverse)
set.seed(2)
df <-
data.frame(
x = sample(seq(as.Date('2000/01/01'), as.Date('2015/01/01'), by="day"), 10),
group = sample(c("A","B"),10,replace = T),
value = sample(1:10,size=10)
) %>% arrange(x)
df <- df %>%
group_by(group) %>%
mutate(own_lag = lag(value))
df %>% data.frame(other_lag = c(NA,1,2,7,7,9,10,10,8,6))
Run Code Online (Sandbox Code Playgroud)
非常感谢你!