countyfloods (version 0.0.2)

get_gages: Get all gage site numbers for a county

Description

Pulls gage numbers of all gages with discharge data within a county and within the specified date range.

Usage

get_gages(county_cd, start_date, end_date)

Arguments

county_cd

Character vector with the county FIPS code

start_date

Character string with the starting date, using "YYYY-MM-DD" notation.

end_date

Character string with the end date, using "YYYY-MM-DD" notation.

Value

A dataframe that gives the following variables for stream gages within the county and time range:

Name	Type	Description
agency_cd	character	Agency running the gage (typically will be the USGS)
site_no	character	USGS gage ID
station_nm	character	Name of the gage site
site_tp_cd	character	Type of gage (should always be "ST" for stream)
dec_lat_va	numeric	Latitude of the gage site, in decimal degrees
dec_long_va	numeric	Longitude of the gage site, in decimal degrees
county_cd	character	Five-digit FIPS code of gage county location
DA	numeric	Drainage area of the gage, in square miles

Note that the returned object is the same as that returned by the whatNWISsites funtion in the dataRetrieval package, but with county FIPS added for each gage.

Examples

# NOT RUN {
get_gages("12086", start_date = "1988-01-01", end_date = "2015-01-01")

va_counties <- get_county_cd("Virginia")
va_gages <- get_gages(va_counties, start_date = "2015-01-01",
                      end_date = "2015-12-31")
# Equivalent with piping
library(dplyr)
va_gages <- get_county_cd("Virginia") %>%
   get_gages(start_date = "2015-01-01", end_date = "2015-12-31")
# }