Create question1.R