optim.pca.distance.j.new function

Optimized PCA Distance