diff --git a/R/readNWISdv.r b/R/readNWISdv.r index 2834f562d378f128452428eb099cf05c9f510270..5d79ae545f8027efaf9b2571df01ecaafdbf2fab 100644 --- a/R/readNWISdv.r +++ b/R/readNWISdv.r @@ -24,11 +24,13 @@ #' startDate, endDate, statCd=c('00001','00003')) #' rawDailyMultiSites<- readNWISdv(c("01491000","01645000"),c('00010','00060'), #' startDate, endDate, statCd=c('00001','00003')) +#' x <- readNWISdv("10258500","00060", "2014-09-10", "2014-09-12") readNWISdv <- function (siteNumber,parameterCd,startDate="",endDate="",statCd="00003"){ url <- constructNWISURL(siteNumber,parameterCd,startDate,endDate,"dv",statCd=statCd) - data <- importWaterML1(url) + data <- importWaterML1(url, asDateTime=TRUE) + return (data) }