## Not run:
# # Examples not run for time considerations
# dataTemp <- readNWISdata(stateCd="OH",parameterCd="00010", service="dv")
# instFlow <- readNWISdata(sites="05114000", service="iv",
# parameterCd="00060",
# startDate="2014-05-01T00:00Z",endDate="2014-05-01T12:00Z")
#
# instFlowCDT <- readNWISdata(sites="05114000", service="iv",
# parameterCd="00060",
# startDate="2014-05-01T00:00",endDate="2014-05-01T12:00",
# tz="America/Chicago")
#
# #Empty:
# multiSite <- readNWISdata(sites=c("04025000","04072150"), service="iv",
# parameterCd="00010")
# #Not empty:
# multiSite <- readNWISdata(sites=c("04025500","040263491"),
# service="iv", parameterCd="00060")
# bBoxEx <- readNWISdata(bBox=c(-83,36.5,-81,38.5), parameterCd="00010")
#
# startDate <- as.Date("2013-10-01")
# endDate <- as.Date("2014-09-30")
# waterYear <- readNWISdata(bBox=c(-83,36.5,-81,38.5), parameterCd="00010",
# service="dv", startDate=startDate, endDate=endDate)
# siteInfo <- readNWISdata(stateCd="WI", parameterCd="00010",
# hasDataTypeCd="iv", service="site")
# qwData <- readNWISdata(bBox=c(-82.5,41.52,-81,41),startDate=as.Date("2000-01-01"),
# drain_area_va_min=50, qw_count_nu=50,qw_attributes="expanded",
# qw_sample_wide="wide",list_of_search_criteria=c("lat_long_bounding_box",
# "drain_area_va","obs_count_nu"),service="qw")
# temp <- readNWISdata(bBox=c(-83,36.5,-81,38.5), parameterCd="00010", service="site",
# seriesCatalogOutput=TRUE)
# wiGWL <- readNWISdata(stateCd="WI",service="gwlevels")
# meas <- readNWISdata(state_cd="WI",service="measurements",format="rdb_expanded")
# ## End(Not run)
Run the code above in your browser using DataLab