Day2_3: Loading data into R