Update rsquaredglm.R

Minor changes to example models so results are consistent (previously, having random responses in model formula were generating new data for null.models for Poisson data)