powered by
plotLoading(x, ncomp = NULL, ...)
prcomp
plsr
drawEEM
filled.contour
data(applejuice) applejuice_uf <- unfold(applejuice) # unfold list into matrix result <- prcomp(applejuice_uf) plotLoading(result, ncomp = 1) # plot loading of the first PC
Run the code above in your browser using DataLab