[phecomp][pcaHMMmodels.R] cleaning code