Create plotGlm.R