Eta²_G works
(slight differences with afex are due to the different method afex uses for computing SSs)

(Still need to add Omega2G)

library(effectsize)

options(contrasts = c('contr.sum', 'contr.poly'))


data(obk.long, package = "afex")
m_afex <- afex::aov_car(value ~ treatment * gender + Error(id),
                        data = obk.long, observed = "gender")

m_aov <- aov(value ~ treatment * gender + Error(id),
             data = m_afex$data$long)


afex::nice(m_afex, es = "ges")
#> Anova Table (Type 3 tests)
#> 
#> Response: value
#>             Effect    df  MSE      F  ges p.value
#> 1        treatment 2, 10 1.52 3.94 + .289    .055
#> 2           gender 1, 10 1.52 3.66 + .189    .085
#> 3 treatment:gender 2, 10 1.52   2.86 .295    .104
#> ---
#> Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '+' 0.1 ' ' 1

eta_squared(m_aov, generalized = "gender")
#> Group |        Parameter | Eta2 (generalized) |       90% CI
#> ------------------------------------------------------------
#> id    |        treatment |               0.31 | [0.00, 0.58]
#> id    |           gender |               0.14 | [0.00, 0.47]
#> id    | treatment:gender |               0.31 | [0.00, 0.58]

^{Created on 2020-10-09 by the reprex package (v0.3.0)}

Generalized eta2 and Omega2 #42

Description

Metadata

Assignees

Labels

Type

Projects

Milestone

Relationships

Development

Issue actions