Test of Homogeneity of Covariance Matrices given by Chaipitak and Chongcharoen 2013
Chaipitak2013(x, ...)
| x | data as a data frame, list of matrices, grouped data frame, or resample object |
|---|---|
| ... | other options passed to covTest method |
A list with class "htest" containing the following components:
statistic |
the value of homogeneity of covariance test statistic |
parameter |
the degrees of freedom for the chi-squared statistic |
p.value |
the p=value for the test |
estimate |
the estimated covariances if less than 5 dimensions |
null.value |
the specified hypothesized value of the covariance difference |
alternative |
a character string describing the alternative hyposthesis |
method |
a character string indicating what type of homogeneity of covariance test was performed |
The homogeneityCovariances function is a wrapper function that formats the data
for the specific covTest functions.
Chaipitak, S. and Chongcharoen, S. (2013). A test for testing the equality of two covariance matrices for high-dimensional data. Journal of Applied Sciences, 13(2):270-277. 10.3923/jas.2013.270.277
irisSpecies <- unique(iris$Species) iris_ls <- lapply(irisSpecies, function(x){as.matrix(iris[iris$Species == x, 1:4])} ) names(iris_ls) <- irisSpecies Chaipitak2013(iris_ls)#> #> Chaipitak and Chongchareon 2013 Homogeneity of Covariance Matrices #> Test #> #> data: setosa, versicolor and virginica #> Chi-Squared = 5.901, df = 2, p-value = 0.05231 #> alternative hypothesis: true difference in covariance matrices is not equal to 0 #>