#PCA and line plot. Notice how the profiles are dominated by two high value columns
mtcars.PCA<-prcomp(mtcars);
lineplot(mtcars.PCA$x,mtcars);
#Use ylim and clipping to allow us to focus on the columns with lower values
lineplot(mtcars.PCA$x,mtcars,ylim=c(0,10),clipped=TRUE)
Run the code above in your browser using DataLab