Improve R PCA interface