powered by
pcaplot3d(x,...) ## S3 method for class 'symproc': pcaplot3d(x, pcshow = c(1, 2, 3), mag = 3, color = 4, lwd = 1,sym=TRUE,...) ## S3 method for class 'nosymproc': pcaplot3d(x, pcshow = c(1, 2, 3), mag = 3, color = 4, lwd = 1,...)
procSym
data(nose) #make a tiny sample nosearr <- bindArr(longnose.lm, shortnose.lm, along=3) proc <- procSym(nosearr) pcaplot3d(proc,pcshow=1,mag=-3)#only one PC available
Run the code above in your browser using DataLab