# NOT RUN {
# These examples require an internet connection to run
siteNumber <- '04085427'
startDate <- '2012-01-01'
endDate <- '2012-06-30'
pCode <- '00060'
rawDailyQ <- getNWISdvData(siteNumber,pCode, startDate, endDate)
rawDailyTemperature <- getNWISdvData(siteNumber,'00010',
startDate, endDate, statCd='00001')
rawDailyTemperatureTSV <- getNWISdvData(siteNumber,'00010',
startDate, endDate, statCd='00001',format='tsv')
rawDailyQAndTempMeanMax <- getNWISdvData(siteNumber,c('00010','00060'),
startDate, endDate, statCd=c('00001','00003'))
rawDailyMultiSites<- getNWISdvData(c("01491000","01645000"),c('00010','00060'),
startDate, endDate, statCd=c('00001','00003'))
# }
Run the code above in your browser using DataLab