R:I';我试图将rollmean(zoo)应用于列表中几个数据帧中的特定列

R:I';我试图将rollmean(zoo)应用于列表中几个数据帧中的特定列,r,for-loop,lapply,mean,zoo,R,For Loop,Lapply,Mean,Zoo,重述: 循环?也没有成功 lapply(list_of_df), function(x) rollmean(list_of_df, 2)) For(i in list_of_df){roll_mean 1问题在一点上说它只想在Y上执行rollmean,而在另一点上说这是有效的roll_mean你是指使用lappy?lappy(list_of_df,function(x)rollmean(x,2)) roll_mean <- rollmean(list_of_df$A, 2) roll_m

重述:

循环?也没有成功

lapply(list_of_df), function(x) rollmean(list_of_df, 2))

For(i in list_of_df){roll_mean 1问题在一点上说它只想在Y上执行rollmean,而在另一点上说这是有效的
roll_mean你是指使用
lappy
lappy(list_of_df,function(x)rollmean(x,2))
roll_mean <- rollmean(list_of_df$A, 2)
roll_mean
roll_mean1 <- rollmean(list_of_df, 2)
roll_mean1
Sub1 <- lapply(list_of_df, "[", 2)
roll_mean1 <- rollmean(Sub1, 2)
roll_mean1
lapply(list_of_df), function(x) rollmean(list_of_df, 2))
For (i in list_of_df) {roll_mean1 <- rollmean(Sub1, 2)
    Exp 
}
lapply(list_of_df, rollmean, 2)
for(i in seq_along(list_of_df)) list_of_df[[i]] <- rollmean(list_of_df[[i]], 2)
lapply(list_of_df, transform, Y = rollmean(Y, 2, fill = NA))
for(i in seq_along(list_of_df)) {
  list_of_df[[i]]$Y <- rollmean(list_of_df[[i]]$Y, 2, fill = NA)
}