aovTidyTable {psychReport}

aovTidyTable

Description

Take output from base aov function and produce a "tidy" ANOVA table similar to the output of ezANOVA. The output also contains the marginal means.

Usage

aovTidyTable(aovObj)

Arguments

aovObj

Output from aov function

Value

list

Examples

# create dataframe
dat <- createDF(nVP = 6, nTrl = 1,
                design = list("Comp" = c("comp", "incomp")))

dat <- addDataDF(dat, RT = list("Comp comp"   = c(500, 150, 100),
                                "Comp incomp" = c(520, 150, 100)))

aovObj <- aov(RT ~ Comp + Error(VP/(Comp)), dat)
aovObj <- aovTable(aovObj)
aovObj$ANOVA
printTable(aovObj$ANOVA)