From d0619ba814d77a2c3f99778e6110957a4cbf6fed Mon Sep 17 00:00:00 2001
From: unknown <ldecicco@usgs.gov>
Date: Tue, 2 Dec 2014 09:16:50 -0600
Subject: [PATCH] Changing dateTime to date.

---
 R/readNWISdv.r | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/R/readNWISdv.r b/R/readNWISdv.r
index 00f50eeb..14a5f30b 100644
--- a/R/readNWISdv.r
+++ b/R/readNWISdv.r
@@ -16,7 +16,7 @@
 #' Name \tab Type \tab Description \cr
 #' agency \tab character \tab The NWIS code for the agency reporting the data\cr
 #' site \tab character \tab The USGS site number \cr
-#' datetime \tab Date \tab The date of the value \cr 
+#' Date \tab Date \tab The date of the value \cr 
 #' code \tab character \tab Any codes that qualify the corresponding value\cr
 #' value \tab numeric \tab The numeric value for the parameter \cr
 #' }
@@ -68,6 +68,8 @@ readNWISdv <- function (siteNumber,parameterCd,startDate="",endDate="",statCd="0
   if(nrow(data)>0){
     data$dateTime <- as.Date(data$dateTime)
     data$tz_cd <- NULL
+    data$Date <- data$dateTime 
+    data$dateTime <- NULL
   }
   
 
-- 
GitLab