如何使用papaja R包进行glht输出？

Question

根据instructions，我得出了以下结论：

library(papaja)
library(datasets)
library(stats)
library(multcomp)


bla <- glm('MPG.highway ~ DriveTrain*Origin',data = Cars93)
contrast.matrix <- rbind('main' = c(0,1,0,0,0.5,0), 'int' = c(0,0,0,0,1,0))
blac <-  glht(bla, linfct = contrast.matrix)
apa_print.glht(blac,test = multcomp::adjusted())
apa_print.summary.glht(summary(blac,test=adjusted(type="bonferroni")))

这不起作用：“无法子集不存在的列。x列p.value不存在。”

有更好的主意吗？或者因为这个包是实验性的，所以它根本不起作用？也接受关于如何将glht的输出打印到由knitr生成的htlm文档的提示。

Answer 1

apa_print.glht()注释的文档

这些方法没有经过适当的测试，应该被认为是实验性的。

似乎有一些上游的变化导致了这种方法的失败。很抱歉，但是it should now be fixed。请尝试安装最新开发版本的papaja：

remotes::install_github("crsh/papaja@devel")

apa_print(blac,test = multcomp::adjusted())

Answer 2

在安装了最后一个devel之后。在运行带有"emmeans“对象的apa_print时，同样的错误也发生在我的例子中：

错误:无法子集不存在的列。X列p.value不存在。