# NOT RUN {
# Run if HYDAT database has been downloaded (using tidyhydat::download_hydat())
if (file.exists(tidyhydat::hy_downloaded_db())) {
# Plot screening statistics using a data frame and data argument with defaults
flow_data <- tidyhydat::hy_daily_flows(station_number = "08NM116")
plot_data_screening(data = flow_data)
# Plot screening statistics using station_number argument with defaults
plot_data_screening(station_number = "08NM116")
# Plot screening statistics for water years starting in October
plot_data_screening(station_number = "08NM116",
water_year_start = 10)
# Plot screening statistics for 7-day flows for July-September months only
plot_data_screening(station_number = "08NM116",
roll_days = 7,
months = 7:9)
}
# }
Run the code above in your browser using DataLab