Update ProPre.R

Added last bit of lm attempts to rule out other options.