principal
to do our principal components analysis, then we do not need this routine.eigen.loadings(x)
## The function is currently defined as
"eigen.loadings" <-
function (x) { #convert eigen vectors to loadings by unnormalizing them
#used if using princomp or princ, not needed for principal
return(x$vectors %*% sqrt(diag(x$values)))
}
Run the code above in your browser using DataLab