powered by
PCdist(PCs, PCscores, x = 5, plot.type = "b")
library(shapes) a <- procSym(gorf.dat) PCdist(a$PCs, a$PCscores, x = 2)
Run the code above in your browser using DataLab