optim.pca.variance.j.new function

Optimized PCA Variance