将群组摘要导出到CSV

Question

我正在尝试使用（类似于）生成的一组摘要统计信息进行CSV导出

group_sum <- tapply(df$value, df$group, summary)

我尝试用它导出这批摘要统计信息：

write.csv(t(as.matrix(group_sum)), file="name.csv")

尽管输出已写入CSV。它没有正确组织。第1行列出了组名，第2行包含了每个组的所有摘要统计信息。

我需要的是标题行，其中列出了所生成的统计信息的类型（例如，最小值，第一位数，中位数，均值，第三位数，最大值），以及摘要统计信息的每组均在标题下方的单独行中列出行（在单独的列中标有组名）。关于如何以这种方式生成CSV输出的任何想法？

Answer 1

tapply()函数返回write.csv()无法处理的列表。将列表更改为矩阵。您没有提供任何数据，因此我将使用R中的iris数据集：

data(iris)
group_sum  <- do.call(rbind, tapply(iris$Sepal.Length, iris$Species, summary))
write.csv(group_sum, file="name.csv")

这些功能记录在其手册页上：help(tapply)（或仅?tapply）和help(write.csv)。