Create Lab2.R