powered by
haff_cov(S, n)
Lin, S.P. and Perlman, M.D.. "A Monte Carlo comparison of four estimators of a covariance matrix." Multivariate Analysis 6 (1985): 411-429.
Stein, C. "Estimation of a covariance matrix". Rietz Lecture (1975).
p <- 5 n <- 10 S <- rWishart(1, n, diag(p))[,,1] haff_cov(S, n)
Run the code above in your browser using DataLab