data <- read.csv("/u1/junk/weather/Indianapolis-Weather-Station-USW00093819-1950-2018.csv") summary(data) table(data) View(data) nrow(data) ncol(data) dim(data) head(data) tail(data) data[1,] data[1:2, 1:2] colnames(data) mean(data$MEAN) mean(data$TMAX - data$TMIN) hist(data$TMAX) boxplot(data[,2:6])