#use demo data
data(pcpMatrix)
groups <- rownames(pcpMatrix)
#run function
prj <- pcp(pcpMatrix, groups)
#getData accessor
getData(prj)
#getData accessor specific
getData(prj, "line")
#plot the result (if dim >2, then plot in 3d)
plot(prj)
#plot the result (if dim =2, then plot in 2d)
prj2 <- pcp(pcpMatrix[,1:2], groups)
plot(prj2)
Run the code above in your browser using DataLab