barrlett.test
bartlett.test适合符合正态分布的数据作方差齐性检验。其函数用法如下：
bartlett.test(x, g, ...) 其中x为数据框，g为分组变量
> data<-read.csv(file=file.choose())
> bartlett.test(data$grades,data$class)
Bartlett test of homogeneity of
variances
data: data$grades and data$class
Bartlett's K-squared = 0.37453, df =
1, p-value = 0.5405
p-value>0.05，可认为数据的方差是齐性的。
leveneTest()函数
非正态和正态数据均适用，其函数用法如下：
leveneTest(y, group, center=median, ...) 参数意义和bartlett.test函数一样。
library(car)
attach(data)
leveneTest(grades,class)
Levene's Test for Homogeneity of Variance (center = median)
Df F value Pr(>F)
group 1 0.0417 0.8389
54
p-value>0.05，可认为数据的方差是齐性的。
