fix pf.R