Create influential.pgls.R