Create power.pgls.R