Update ppc.R