Add script for comparison on pca between h2o and R