导出 TukeyHSD 结果

Question

我在导出我的 TukeyHSD 结果时遇到问题，因此当我以类似 Excel 的形式打开结果时，它们会在单元格中分开。我尝试使用 write.csv() 但它说：

cannot coerce class "c("TukeyHSD", "multicomp")" to a data.frame

我怎样才能以一种可以将它们复制并粘贴到 Excel sheet 中的方式捕获我的 TukeyUSD 结果？

Answer 1

TukeyHSD returns class "TukeyHSD" 的对象。您可以使用 $ 运算符从 "TukeyHSD" 对象中提取 table 结果。然后，您可以按照您认为合适的任何方式导出或修改 table。

fm1 <- aov(breaks ~ wool + tension, data = warpbreaks)
res <- TukeyHSD(fm1, "tension", ordered = TRUE)
as.data.frame(res$tension)
#          diff        lwr      upr       p adj
# M-H  4.722222 -4.6311985 14.07564 0.447421021
# L-H 14.722222  5.3688015 24.07564 0.001121788
# L-M 10.000000  0.6465793 19.35342 0.033626219

Answer 2

这个对我有用

ANOVA_Tc<-aov(Concentration~ Sample, data= Tc)

summary(ANOVA_Tc)

TKHSD_Tc <- TukeyHSD(ANOVA_Tc)

TK<-(TKHSD_Tc)

TK_data<-as.data.frame(TK[1]) # the [1] locates the part of the output to be exported

write.csv(TK_data, 'TK_data.csv')

导出 TukeyHSD 结果

Exporting TukeyHSD results

export

r

tukey