Create Lab3a.R