Commit 664ab0bb authored by Laura A DeCicco's avatar Laura A DeCicco
Browse files

Remove deprecated function's example

parent c4ed1e82
...@@ -79,26 +79,6 @@ ...@@ -79,26 +79,6 @@
#' @export #' @export
#' @seealso \code{\link{readWQPdata}}, \code{\link{whatWQPsites}}, #' @seealso \code{\link{readWQPdata}}, \code{\link{whatWQPsites}},
#' \code{\link{readWQPqw}}, \code{\link{constructNWISURL}} #' \code{\link{readWQPqw}}, \code{\link{constructNWISURL}}
#' @examples
#' site_ids <- c('04024430','04024000')
#' startDate <- '2010-01-01'
#' endDate <- ''
#' parameterCd <- c('34247','30234','32104','34220')
#' \donttest{
#' rawNWISqwData <- readNWISqw(site_ids,parameterCd,startDate,endDate)
#' rawNWISqwDataReshaped <- readNWISqw(site_ids,parameterCd,
#' startDate,endDate,reshape=TRUE)
#' parameterCd <- "all"
#' rawNWISall <- readNWISqw(site_ids,parameterCd,
#' startDate,endDate)
#' pgroup <- c("NUT")
#' rawNWISNutrients <- readNWISqw(site_ids,pgroup,
#' startDate,endDate)
#' groups <- c("NUT","OPE")
#' rawNWISNutOpe <- readNWISqw(site_ids,groups,
#' startDate,endDate)
#' rawISO <- readNWISqw("413144073115701", "ISO")
#' }
readNWISqw <- function (siteNumbers,parameterCd,startDate="",endDate="", readNWISqw <- function (siteNumbers,parameterCd,startDate="",endDate="",
expanded=TRUE,reshape=FALSE,tz="UTC"){ expanded=TRUE,reshape=FALSE,tz="UTC"){
......
...@@ -101,27 +101,6 @@ ISO \tab Stable Isotopes \cr ...@@ -101,27 +101,6 @@ ISO \tab Stable Isotopes \cr
} }
If more than one parameter group is requested, only sites that data for all requested groups are returned. If more than one parameter group is requested, only sites that data for all requested groups are returned.
} }
\examples{
site_ids <- c('04024430','04024000')
startDate <- '2010-01-01'
endDate <- ''
parameterCd <- c('34247','30234','32104','34220')
\donttest{
rawNWISqwData <- readNWISqw(site_ids,parameterCd,startDate,endDate)
rawNWISqwDataReshaped <- readNWISqw(site_ids,parameterCd,
startDate,endDate,reshape=TRUE)
parameterCd <- "all"
rawNWISall <- readNWISqw(site_ids,parameterCd,
startDate,endDate)
pgroup <- c("NUT")
rawNWISNutrients <- readNWISqw(site_ids,pgroup,
startDate,endDate)
groups <- c("NUT","OPE")
rawNWISNutOpe <- readNWISqw(site_ids,groups,
startDate,endDate)
rawISO <- readNWISqw("413144073115701", "ISO")
}
}
\seealso{ \seealso{
\code{\link{readWQPdata}}, \code{\link{whatWQPsites}}, \code{\link{readWQPdata}}, \code{\link{whatWQPsites}},
\code{\link{readWQPqw}}, \code{\link{constructNWISURL}} \code{\link{readWQPqw}}, \code{\link{constructNWISURL}}
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment