r - 在汽车包装的重复测量方差分析中调整球度校正的自由度

Question

我正在使用汽车包运行重复测量方差分析。哪个工作正常并返回与此类似的输出:

Univariate Type III Repeated-Measures ANOVA Assuming Sphericity

                SS num Df Error SS den Df        F    Pr(>F)    
(Intercept) 7260.0      1   603.33     15 180.4972 9.100e-10 ***
phase        167.5      2   169.17     30  14.8522 3.286e-05 ***
hour         106.3      4    73.71     60  21.6309 4.360e-11 ***
phase:hour    11.1      8   122.92    120   1.3525    0.2245    
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1 


Mauchly Tests for Sphericity

        Test statistic  p-value
phase             0.70470 0.086304
hour              0.11516 0.000718
phase:hour        0.01139 0.027376


Greenhouse-Geisser and Huynh-Feldt Corrections
for Departure from Sphericity

            GG eps Pr(>F[GG])    
phase      0.77202  0.0001891 ***
hour       0.49842  1.578e-06 ***
phase:hour 0.51297  0.2602357    
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1 

现在它告诉我，在某些情况下，必须应用球形度校正。据我了解，这种修正不仅会影响 p 值，还会影响自由度 (df)。然而，输出没有显示这一点。那么如何显示调整后的 df 呢？

Answer 1

也许您已经解决了这个问题，但是要在 Greenhouse-Geisser 或 Huynh-Feldt 校正的情况下校正自由度，您只需将每个自由度乘以相应的 epsilon 值。以下是基于您的结果的示例:

# degrees of freedom for phase:hour
num_Df <- 8
den_Df <- 120

# Greenhouse-Geisser epsilon
gg_e <- 0.51297

# adjusted degrees of freedom
num_Df_adj <- gg_e * num_Df 
den_Df_adj <- gg_e * den_Df