Following the instructions, I came up with the following:
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")))
that does not work:
"Can't subset columns that don't exist.
x Column p.value
doesn't exist."
Any better ideas? Or since the package is experimental it does not work at all yet? Tips on how to print the output of glht to an htlm document produced by knitr are also accepted.