library(twowaytests)
data(alveolar)
MestTwoWay(cell ~ ovalbumin*treatment, data = alveolar)
out <- MestTwoWay(cell ~ ovalbumin*treatment, data = alveolar, verbose = FALSE)
paircompTwoWay(out)
out <- MestTwoWay(cell ~ treatment*ovalbumin, data = alveolar, verbose = FALSE)
paircompTwoWay(out)
Run the code above in your browser using DataLab