#use demo data
data(pcpMatrix)
groups <- rownames(pcpMatrix)
#run function
prj <- pcp(pcpMatrix, groups)
cl <- classify(prj)
#getData accessor
getData(cl)
#getData accessor specific
getData(cl, "scores")
#plot result
plot(cl)
Run the code above in your browser using DataLab