## Not run:
# denver_ex <- daily_fips("08031", coverage = 0.90, date_min = "2010-01-01",
# date_max = "2010-02-01", var = "prcp")
#
# head(denver_ex$daily_data)
# denver_ex$station_map
#
# mobile_ex <- daily_fips("01097", date_min = "1997-07-13",
# date_max = "1997-07-25", var = "prcp",
# average_data = FALSE)
# library(ggplot2)
# ggplot(mobile_ex$daily_data, aes(x = date, y = prcp, color = id)) +
# geom_line()
# ## End(Not run)
Run the code above in your browser using DataLab