Day3_2: Loading data into R-Exercise