Create glm.sample3.R