syk: One-Sample Covariance Test by Srivastava, Yanagihara, and Kubokawa (2014)
Description
Given data, it performs 1-sample test for Covariance where
the null hypothesis is
$$H_0 : \Sigma_n = \Sigma_0$$
where \(\Sigma_n\) is the covariance of data model and \(\Sigma_0\) is a
hypothesized covariance based on a procedure proposed by Srivastava, Yanagihara, and Kubokawa (2014).
Usage
syk(data, Sigma0, alpha)
Value
a named list containing
statistic
a test statistic value.
threshold
rejection criterion to be compared against test statistic.
reject
a logical; TRUE to reject null hypothesis, FALSE otherwise.
Arguments
data
an \((n\times p)\) data matrix where each row is an observation.
## generate data from multivariate normal with trivial covariance.p = 5;n=10data = matrix(rnorm(n*p), ncol=p)
alpha=0.05Sigma0=diag(ncol(data))
## run the testsyk(data, Sigma0, alpha)