Question

我正在努力弄清楚如何聚合然后合并数据帧列表。有人这样做吗？

这里是例子。我有一个通过分类变量拆分而创建的数据框的列表。

list1df 93 obs of 6 variables:
- categoricalvar1: Factor w...
- categoricalvar2: Factor w...
- categoricalvar3: Factor w...
- numericvar1: num...
- numericvar2: num...
- thedate: Date, format "2018-11-13"...

list2df 3988 obs of 6 variables:
- categoricalvar1: Factor w...
- categoricalvar2: Factor w...
- categoricalvar3: Factor w...
- numericvar1: num...
- numericvar2: num...
- thedate: Date, format "2018-11-13"...

list3df 563 obs of 6 variables:
- categoricalvar1: Factor w...
- categoricalvar2: Factor w...
- categoricalvar3: Factor w...
- numericvar1: num...
- numericvar2: num...
- thedate: Date, format "2018-11-13"...

我正试图弄清楚如何施加/施加这样的东西：

sumtable<- function(thedate,df,thefun)
{
  dfgrouped <- aggregate(. ~thedate, data=df, thefun, na.rm=TRUE)
  return(dfgrouped)
}

针对列表中的每个单独的数据框，以按天创建汇总的框，之后，我将使用ldply（thebiglist，data.frame）将它们重新粘合在一起。

我不知道如何使sumtable函数与lapply和列表中的所有框架一起使用。预先谢谢你！

Answer 1

我们可以将data.frames放在list中，并将aggregate与特定功能配合使用

lst <- lapply(mget(ls(pattern = '^list\\d+df$')), function(x) 
    aggregate(. ~ thedate, data = x, FUN = max, na.rm = TRUE))

do.call(rbind, lst)

按日期汇总列表中的数据框，然后合并回来-不好意思吗？

1 个答案: