fixed error in mcmc.pca.spatial.pp.R code