我必须测试温度对某些真菌生长的影响，因此我有3种不同的温度，其中在6天的不同时间内测量了真菌的生长。分割图设计用作实验设计（温度全图和真菌菌株子图），该研究有3个不同的重复。 为了进行分析（然后将时间表格式从宽格式更改为长格式），我使用了混合线性模型，而应变和温度被视为固定效应，而每个重复则被视为随机效应
Fungal_growth <- lmerTest::lmer(mm ~ Strain + Temp + (1 | Repeat), data = Long_All_rep)
anova_Fungal_growth_LmerTest<-anova(Fungal_growth )
一切顺利，如您在所附照片中看到的方差分析结果enter image description here；但是当我要检查Shapiro测试的方差分析
shapiro.test(resid(anova_Fungal_growth_LmerTest))
我有一条提到的错误消息
“Error in shapiro.test(resid(anova_Fungal_growth_LmerTest)) : is.numeric(x) is not TRUE”
然后我将“ as.numeric”命令添加到上一个命令
shapiro.te st（as.numeric（resid（anova_Fungal_growth_LmerTest）））
我有提到的错误
“Error in shapiro.test(as.numeric(resid(anova_Fungal_growth_LmerTest))) : sample size must be between 3 and 5000”
然后我提取残差，直接对提取的残差进行Shapiro测试
Anova_lmer_Fungal_groth resid← residuals(anova_Fungal_growth_LmerTest)
但是令人惊讶的是，残差的结果仅为“ NULL”
有人知道这是什么问题吗？而我该如何克服这个问题呢？