knitr::opts_chunk$set(echo = TRUE)
temps_data <- read.table('C:/Users/mjpearl/Desktop/omsa/ISYE_6501/hw3/data/temps.txt',header = TRUE, stringsAsFactors = FALSE)
temps_data <- read.table('C:/Users/mjpearl/Desktop/omsa/ISYE-6501-OAN/hw3/data/temps.txt',header = TRUE, stringsAsFactors = FALSE)
head(temps_data)
clear
exit()
exit