我很难领先或落后于整个数据框。我能做的是通过以下尝试而不是全部来移动各个列:
require('DataCombine')
df_l <- slide(df, Var = var1, slideBy = -1)
使用 colnames(x_ret_mon) 作为 Var 不起作用,我被告知在数据框中找不到变量名称。
此尝试将列向右移动但不向下移动:
df_l<- dplyr::lag(df)
这只会为滞后变量创建新变量,但我不知道如何有效地删除旧的非滞后值:
df_l<-shift(df, n=1L, fill=NA, type=c("lead"), give.names=FALSE)