Last chance! 50% off unlimited learning
Sale ends in
principal
to do our principal components analysis, then we do not need this routine.eigen.loadings(x)
x <- eigen(Harman74.cor$cov)
x$vectors[1:8,1:4] #as they appear from eigen
y <- princomp(covmat=Harman74.cor$cov)
y$loadings[1:8,1:4] #as they appear from princomp
eigen.loadings(x)[1:8,1:4] # rescaled by the eigen values
Run the code above in your browser using DataLab