> dim(mtcars)

[1] 32 11

> leveneTest(mtcars$mpg~factor(mtcars$am))

Levene's Test for Homogeneity of Variance(center = median)

     Df F value  Pr(>F)  

group 1  4.1876 0.04957 *

     30                  

##################################################################

##################################################################

> > dim(a)

[1] 60 3

> str(a)

'data.frame':   60 obs. of  3 variables:

$number.of.moths: int  32 29 16 18 20 3740 18 28 36 ...

$location       : Factor w/ 4 levels"Ground","Lower",..: 4 4 4 4 4 3 3 3 3 3 ...

$type.of.lure   : Factor w/ 3 levels"Chemical","Scent",..: 1 1 1 1 1 1 1 1 1 1 ...

> head(a)

number.of.moths location type.of.lure

1              32      Top    Chemical

2              29      Top    Chemical

3              16      Top    Chemical

4              18      Top    Chemical

5              20      Top    Chemical

6             37   Middle    Chemical

> leveneTest(number.of.moths~location*type.of.lure)

Levene's Test for Homogeneity of Variance(center = median)

     Df F value Pr(>F)

group 11 0.6377 0.7875

     48  

方差齐性检验结果里，group1，group11什么意思？