Correction to do.PCoA.R