Some initial code to do em pca