–过 程 严 谨
–方 法 可 靠
–结 果 准 确
## # A tibble: 3 × 4
## Species variable statistic p
## <fct> <chr> <dbl> <dbl>
## 1 setosa Sepal.Length 0.978 0.460
## 2 versicolor Sepal.Length 0.978 0.465
## 3 virginica Sepal.Length 0.971 0.258
非常严格,不通过的话,需要转换或非参数方差分析
```r
library(rstatix)
iris %>%
# group_by(Species)%>%
levene_test(Sepal.Length ~ Species,center = median)
```
```
## # A tibble: 1 × 4
## df1 df2 statistic p
##
## 1 2 147 6.35 0.00226
```
```r
iris %>%
# group_by(Species)%>%
levene_test(Sepal.Length ~ Species,center = mean)
```
```
## # A tibble: 1 × 4
## df1 df2 statistic p
##
## 1 2 147 7.38 0.000882
```
要求不严,不通过的话,可以进行方差不齐的方差分析
By default, median, provides a more robust test.
异常值要按规定进行处理
重复次数至少要达到3次
ANOVA适合3组以上比较
LSD法: 最小显著性差异法(Least Significance Difference),它实质是t检验,并未对检验水准做出任何校正,所以它对差异最为敏感,但当你比较的次数非常多的时候,比如超过三组之间的比较,我们是不太建议使用LSD方法,因为没有对检验水准α进行校准,所以当比较次数过多时会增大I类错误的概率。为解决该问题,便出现了Sidak法和Bonferroni法。
Sidak法和Bonferroni法: 都为LSD的修正,其灵敏度为LSD法>Sidak法>Bonferroni法。所以Bonferroni法建议在比较组别数量较少时使用,当比较的次数较多,比如10次以上,不太建议使用该方法,会出现较多的假阴性结果。
Tukey法: 又叫HSD “Honest Significant Difference”其思想和LSD法类似,但比LSD方法保守,即灵敏度不如LSD。Tukey法要求比较的样本容量相差不大,一般用于样本容量相同的组之间均数的比较。
Scheffe法: 当各组数不相等,或者想进行复杂比较时,用此法比较稳妥。它检验的是各个均数的线性组合,而不是只检验某一对均数间的差异,方法相对比较保守,检验效能高,适用多种情况。
P值是比试验所对应的事件发生更极端的概率
```r
block <- factor(rep(1:6, times = 3))
variety <- rep(c("Golden.rain", "Marvellous", "Victory"), each = 6)
yield <- c(133.25, 113.25, 86.75, 108, 95.5, 90.25,
129.75, 121.25, 118.5, 95, 85.25, 109,
143, 87.25, 82.5, 91.5, 92, 89.5)
oat <- data.frame(block, variety, yield)
aov.model1 <- aov(yield ~ block + variety)
summary(aov.model1)
```
```
## Df Sum Sq Mean Sq F value Pr(>F)
## block 5 3969 793.8 5.280 0.0124 *
## variety 2 447 223.3 1.485 0.2724
## Residuals 10 1503 150.3
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
```
Thanks