va_counties <- get_county_cd("Virginia")
va_gages <- get_gages(va_counties, start_date = "2015-01-01",
end_date = "2015-12-31")
va_nws <- find_nws(site_no = va_gages$site_no, type = "moderate")
Run the code above in your browser using DataLab