Visualize the data - PCA in R