Create quiz1.R