####Session 3: Packages and Scripts####

#Part 1 ####
#Setting my working directory to my dropbox location
setwd("~/Dropbox/R_Stat_Workshop/practice_exercises_in_progress")
data <- read.csv("winter_olympic.csv", sep=",", header=TRUE) 
#View(data)