data-raw/aus_weather.r

library(readr)

aus_weather <- read_csv("data-raw/weatherAUS.csv",
                        guess_max = 100000) %>%
  na.omit() %>%
  select(-Evaporation, -Sunshine, -Cloud9am, -Cloud3pm)

save(aus_weather, file = 'data/aus_weather.rda')
lebebr01/statthink documentation built on Feb. 13, 2024, 12:59 p.m.