siteNumber <- '05114000'
parameterCd <- '00060'
startDate <- "2014-10-10"
endDate <- "2014-10-10"
## Not run:
# rawData <- readNWISuv(siteNumber,parameterCd,startDate,endDate)
#
# timeZoneChange <- readNWISuv(c('04024430','04024000'),parameterCd,
# "2013-11-03","2013-11-03")
#
# centralTime <- readNWISuv(siteNumber,parameterCd,
# "2014-10-10T12:00", "2014-10-10T23:59",
# tz="America/Chicago")
#
# # Adding 'Z' to the time indicates to the web service to call the data with UTC time:
# GMTdata <- readNWISuv(siteNumber,parameterCd,
# "2014-10-10T00:00Z", "2014-10-10T23:59Z")
# ## End(Not run)
Run the code above in your browser using DataLab