From f7750628cac2608de9be0bb9063c94a9f1329c27 Mon Sep 17 00:00:00 2001
From: unknown <ldecicco@usgs.gov>
Date: Tue, 16 Dec 2014 12:14:02 -0600
Subject: [PATCH] Adding new check.
---
R/readNWISunit.r | 1 +
man/readNWISgwl.Rd | 1 +
2 files changed, 2 insertions(+)
diff --git a/R/readNWISunit.r b/R/readNWISunit.r
index 5f221c2a..35fb1254 100644
--- a/R/readNWISunit.r
+++ b/R/readNWISunit.r
@@ -287,6 +287,7 @@ readNWISmeas <- function (siteNumbers,startDate="",endDate="", tz=""){
#' data <- readNWISgwl(siteNumber, '','')
#' sites <- c("434400121275801", "375907091432201")
#' data2 <- readNWISgwl(sites, '','')
+#' data3 <- readNWISgwl("420125073193001", '','')
readNWISgwl <- function (siteNumbers,startDate="",endDate=""){
url <- constructNWISURL(siteNumbers,NA,startDate,endDate,"gwlevels",format="wml1")
diff --git a/man/readNWISgwl.Rd b/man/readNWISgwl.Rd
index b44e9e1b..d2520bc7 100644
--- a/man/readNWISgwl.Rd
+++ b/man/readNWISgwl.Rd
@@ -55,6 +55,7 @@ siteNumber <- "434400121275801"
data <- readNWISgwl(siteNumber, '','')
sites <- c("434400121275801", "375907091432201")
data2 <- readNWISgwl(sites, '','')
+data3 <- readNWISgwl("420125073193001", '','')
}
\seealso{
\code{\link{renameNWISColumns}}, \code{\link{importWaterML1}}
--
GitLab