Detect if a USGS gage is upstream of a lake

Detect if a USGS gage is upstream of a lake

is_lake_gage(site_no, distance_threshold = 20)

Arguments

site_no	character to preserve leading zeros
distance_threshold	numeric in units of km

Examples

if (FALSE) {
site_no <- "040871473"
is_lake_gage(site_no)$is_lake_gage # FALSE
site_no <- "05427718"
is_lake_gage(site_no)$is_lake_gage # TRUE
site_no <- "03208950"
is_lake_gage(site_no)
site_no <- "07130500"
is_lake_gage(site_no)
}