library(ANOPA)
# the ArticleExample3 data shows an effect of the drug administered on the
# proportion of participants who had an episode of delirium tremens
ArticleExample3
# perform an anopa on this dataset
w <- anopa( cbind(cBau,eaPoe,RnV,Placebo) ~ ., ArticleExample3, WSFactors = "Drug(4)")
# We finish with post-hoc Tukey test
e <- posthocProportions( w )
# a small plot is *always* a good idea
anopaPlot(w)
Run the code above in your browser using DataLab