partial_eta_squared(40, 60)
#> $measure
#> [1] "Partial eta-squared"
#>
#> $estimate
#> [1] 0.4
#>
#> $ci_lower
#> [1] NA
#>
#> $ci_upper
#> [1] NA
#>
#> $se
#> [1] NA
#>
#> $n
#> [1] NA
#>
#> $extra
#> list()
#>
#> attr(,"class")
#> [1] "morie_effect_size" "list"