### First, set the working directory where R will find the data

setwd("H:/data/User/Classes/stats01_13/Week03/Class03_2020")

### Read the data
# Read a csv file, named "Week_03_Practice_2013.csv"
dat1 <- read.csv("Week_03_Practice_2013.csv")