powered by
uScree
plotuScree(Eigenvalue, x = Eigenvalue, model = "components", ylab = "Eigenvalues", xlab = "Components", main = "Scree Plot", ... )
nScree
parallel
## SCREE PLOT data(dFactors) attach(dFactors) eig = Cliff1$eigenvalues plotuScree(x=eig)
Run the code above in your browser using DataLab