小编Iri*_*sui的帖子

我正在使用ddply来聚合和汇总数据框变量,我有兴趣循环遍历我的数据框列表来创建新变量.

new.data <- ddply(old.data, 
                  c("factor", "factor2"),
                  function(df)
                    c(a11_a10 = CustomFunction(df$a11_a10),
                      a12_a11 = CustomFunction(df$a12_a11),
                      a13_a12 = CustomFunction(df$a13_a12),
                      ...
                      ...
                      ...))

有没有办法让我在ddply中插入一个循环,以便我可以避免编写每个新的汇总变量,例如

for (i in 11:n) {
  paste("a", i, "_a", i - 1) = CustomFunction(..... )
}

我知道这不是它实际完成的方式,但我只是想表明我是如何构思它的.有没有办法在ddply或通过列表调用的函数中执行此操作？

更新:因为我是新用户,我无法回答我自己的问题:

我的回答涉及Nick的回答和Ista评论的想法:

func <- function(old.data, min, max, gap) {
  varrange <- min:max
  usenames <- paste("a", varrange, "_a", varrange - gap, sep="")
  new.data <- ddply(old.data,
                    .(factor, factor2),
                    colwise(CustomFunction, c(usenames)))
}