R: tidy() 一个 aovlist-object 使用 broom 包

Question

我在整理 avolist 对象时遇到了一些麻烦。在执行重复测量方差分析时，optput 对象通常是针对不同错误层的 aov 对象列表。

datafilename <- "http://personality-project.org/r/datasets/R.appendix5.data"
aov_example <- read.table(datafilename, header = T)
aov_example <- aov(Recall ~ (Task*Valence*Gender*Dosage) + Error(Subject/(Task*Valence)) +(Gender*Dosage), aov_example)
class(aov_example)

[1] "aovlist" "listof"

(示例从 http://personality-project.org/r/#anova 中窃取)

迄今为止，无法直接整理这些对象，因为 broom::fix_data_frame() 不采用列表。

library("broom")
tidy(aov_example)

Error in as.data.frame.default(x) : cannot coerce class "c("aovlist", "listof")" to a data.frame

所以我尝试使用 lapply()，但这会引发错误:

lapply(aov_example, tidy)

Error in `colnames<-`(`*tmp*`, value = c("df", "sumsq", "meansq", "statistic", : Attribute 'names' [5] must be of same length as vector [3]

有没有简单的解决方法？

Answer 1

tidy.aovlist 方法 has been added从 version 0.3.6 开始扫帚，这样就可以简单地做到:

tidy(aov_example)

无需lapply。