bug (y <-> pheno) in variance.decomposition.r