# NOT RUN {
#Use Q2 as flood threshold and get get gage-level output
va_floods <- run_flood(state = "Virginia", start_date = "2015-01-01",
end_date = "2015-12-31", threshold = "Q2", output = "gage")
#Map results by gage
map_flood(va_floods)
#Use NWS flood thresholds and get county-level output
va_floods <- run_flood(state = "Virginia", start_date = "2015-01-01",
end_date = "2015-12-31", threshold = "NWS", flood_type = "action",
output = "county")
#Map results by county
map_flood(va_floods)
# }
Run the code above in your browser using DataLab