# Import the data and look at the first six rows carSpeeds <- read.csv(file = 'data/car-speeds.csv') head(carSpeeds)