Рассчитайте Omega² и частичную Omega² в смешанной ановой

Question

Я анализирую данные в смешанном дизайне, где 1 между 1 и 1 в пределах коэффициента, используя aov_car() из пакета afex.

Я пытался использовать anova_stats() из пакета sjstats, который прекрасно работает для внутри- или межпроектного дизайна, но выдает ошибку:

Fehler in UseMethod("anova") : 
nicht anwendbare Methode für 'anova' auf Objekt der Klasse "Anova.mlm" angewendet

Ошибка на английском (Google Translate):

Error in UseMethod ("anova"):
non-applicable method for 'anova' applied to object of class "Anova.mlm"

, указывающий на проблемы с возвращенным типом данных aov_car()

library(sjstats)
library(afex)
data <- data.frame(ID = rep(c(1:24), each = 4),
              list = rep(c(1:4), 24),
              prop = rnorm(96, 0.8, 0.2),
              treatment = rep(c(1:4), each = 24))
data$treatment <- as.factor(data$treatment)
data$list <- as.factor(data$list)

testAov <- aov_car(prop~list*treatment + Error(ID/list), data=data, return = "Anova")
anova_stats(testAov)

Я был бы очень благодарен, если кто-нибудь мог бы помочь мне с этим!

Информация о моей системе и версии R:

    R version 3.6.0 (2019-04-26)  
    Platform: x86_64-pc-linux-gnu (64-bit)  
    Running under: Arch Linux

Answer 1

Я только что понял, что случилось.return in aov_car() должно быть установлено на "aov".Так что у меня получилось использовать этот код:

testAov <- aov_car(prop~list*treatment + Error(ID/list), data=data, return = "aov")
anova_stats(testAov)