Skip to content
Snippets Groups Projects
Commit ce698111 authored by Laura A DeCicco's avatar Laura A DeCicco
Browse files

Debugging latex error.

parent d567058c
No related branches found
No related tags found
1 merge request!61Debugging latex error.
...@@ -7,8 +7,7 @@ ...@@ -7,8 +7,7 @@
#' that can be found here: \url{http://help.waterdata.usgs.gov/codes-and-parameters/parameters}. To get a #' that can be found here: \url{http://help.waterdata.usgs.gov/codes-and-parameters/parameters}. To get a
#' complete list of all current parameter codes in the USGS, use "all" as the input. #' complete list of all current parameter codes in the USGS, use "all" as the input.
#' @keywords data import USGS web service #' @keywords data import USGS web service
#' @return parameterData data frame with all information from the USGS about the particular parameter. #' @return parameterData data frame with the following information:
#'
#' \tabular{lll}{ #' \tabular{lll}{
#' Name \tab Type \tab Description\cr #' Name \tab Type \tab Description\cr
#' parameter_cd \tab character \tab 5-digit USGS parameter code \cr #' parameter_cd \tab character \tab 5-digit USGS parameter code \cr
...@@ -20,6 +19,7 @@ ...@@ -20,6 +19,7 @@
#' } #' }
#' #'
#' @export #' @export
#' @seealso \code{\link{importRDB1}}
#' @examples #' @examples
#' paramINFO <- readNWISpCode(c('01075','00060','00931')) #' paramINFO <- readNWISpCode(c('01075','00060','00931'))
readNWISpCode <- function(parameterCd){ readNWISpCode <- function(parameterCd){
......
...@@ -55,6 +55,7 @@ ...@@ -55,6 +55,7 @@
#' timeZoneChange <- readNWISuv(c('04024430','04024000'),parameterCd, #' timeZoneChange <- readNWISuv(c('04024430','04024000'),parameterCd,
#' "2013-11-03","2013-11-03") #' "2013-11-03","2013-11-03")
#' } #' }
#'
readNWISuv <- function (siteNumbers,parameterCd,startDate="",endDate="", tz=""){ readNWISuv <- function (siteNumbers,parameterCd,startDate="",endDate="", tz=""){
url <- constructNWISURL(siteNumbers,parameterCd,startDate,endDate,"uv",format="xml") url <- constructNWISURL(siteNumbers,parameterCd,startDate,endDate,"uv",format="xml")
...@@ -66,8 +67,7 @@ readNWISuv <- function (siteNumbers,parameterCd,startDate="",endDate="", tz=""){ ...@@ -66,8 +67,7 @@ readNWISuv <- function (siteNumbers,parameterCd,startDate="",endDate="", tz=""){
#' Reads peak flow data from NWISweb. #' Reads peak flow data from NWISweb.
#' #'
#' Reads peak flow from NWISweb. #' Reads peak flow from NWISweb. Data is retrieved from \url{http://waterdata.usgs.gov/nwis}.
#' Data is retrieved from \url{http://waterdata.usgs.gov/nwis}.
#' #'
#' @param siteNumbers character USGS site number(or multiple sites). This is usually an 8 digit number. #' @param siteNumbers character USGS site number(or multiple sites). This is usually an 8 digit number.
#' @param startDate character starting date for data retrieval in the form YYYY-MM-DD. Default is "" which indicates #' @param startDate character starting date for data retrieval in the form YYYY-MM-DD. Default is "" which indicates
...@@ -100,6 +100,7 @@ readNWISuv <- function (siteNumbers,parameterCd,startDate="",endDate="", tz=""){ ...@@ -100,6 +100,7 @@ readNWISuv <- function (siteNumbers,parameterCd,startDate="",endDate="", tz=""){
#' comment \tab character \tab Header comments from the RDB file \cr #' comment \tab character \tab Header comments from the RDB file \cr
#' siteInfo \tab data.frame \tab A data frame containing information on the requested sites \cr #' siteInfo \tab data.frame \tab A data frame containing information on the requested sites \cr
#' } #' }
#' @seealso \code{\link{constructNWISURL}}, \code{\link{importRDB1}}
#' @export #' @export
#' @examples #' @examples
#' siteNumbers <- c('01594440','040851325') #' siteNumbers <- c('01594440','040851325')
...@@ -153,6 +154,7 @@ readNWISpeak <- function (siteNumbers,startDate="",endDate=""){ ...@@ -153,6 +154,7 @@ readNWISpeak <- function (siteNumbers,startDate="",endDate=""){
#' #'
#' @note Not all active USGS streamgages have traditional rating curves that #' @note Not all active USGS streamgages have traditional rating curves that
#'relate flow to stage. #'relate flow to stage.
#' @seealso \code{\link{constructNWISURL}}, \code{\link{importRDB1}}
#' @export #' @export
#' @examples #' @examples
#' siteNumber <- '01594440' #' siteNumber <- '01594440'
...@@ -215,6 +217,7 @@ readNWISrating <- function (siteNumber,type="base"){ ...@@ -215,6 +217,7 @@ readNWISrating <- function (siteNumber,type="base"){
#' comment \tab character \tab Header comments from the RDB file \cr #' comment \tab character \tab Header comments from the RDB file \cr
#' siteInfo \tab data.frame \tab A data frame containing information on the requested sites \cr #' siteInfo \tab data.frame \tab A data frame containing information on the requested sites \cr
#' } #' }
#' @seealso \code{\link{constructNWISURL}}, \code{\link{importRDB1}}
#' @export #' @export
#' @examples #' @examples
#' siteNumbers <- c('01594440','040851325') #' siteNumbers <- c('01594440','040851325')
...@@ -271,11 +274,12 @@ readNWISmeas <- function (siteNumbers,startDate="",endDate="", tz=""){ ...@@ -271,11 +274,12 @@ readNWISmeas <- function (siteNumbers,startDate="",endDate="", tz=""){
#' \tabular{lll}{ #' \tabular{lll}{
#' Name \tab Type \tab Description \cr #' Name \tab Type \tab Description \cr
#' url \tab character \tab The url used to generate the data \cr #' url \tab character \tab The url used to generate the data \cr
#' siteInfo \tab data.frame \tab A data frame containing information on the requested sites \cr
#' queryTime \tab POSIXct \tab The time the data was returned \cr #' queryTime \tab POSIXct \tab The time the data was returned \cr
#' comment \tab character \tab Header comments from the RDB file \cr
#' siteInfo \tab data.frame \tab A data frame containing information on the requested sites \cr
#' } #' }
#' #'
#' @seealso \code{\link{importRDB1}} #' @seealso \code{\link{constructNWISURL}}, \code{\link{importRDB1}}
#' @export #' @export
#' @examples #' @examples
#' siteNumber <- "434400121275801" #' siteNumber <- "434400121275801"
......
...@@ -34,8 +34,9 @@ There are also several useful attributes attached to the data frame: ...@@ -34,8 +34,9 @@ There are also several useful attributes attached to the data frame:
\tabular{lll}{ \tabular{lll}{
Name \tab Type \tab Description \cr Name \tab Type \tab Description \cr
url \tab character \tab The url used to generate the data \cr url \tab character \tab The url used to generate the data \cr
siteInfo \tab data.frame \tab A data frame containing information on the requested sites \cr
queryTime \tab POSIXct \tab The time the data was returned \cr queryTime \tab POSIXct \tab The time the data was returned \cr
comment \tab character \tab Header comments from the RDB file \cr
siteInfo \tab data.frame \tab A data frame containing information on the requested sites \cr
} }
} }
\description{ \description{
...@@ -53,6 +54,6 @@ data2 <- readNWISgwl(sites, '','') ...@@ -53,6 +54,6 @@ data2 <- readNWISgwl(sites, '','')
data3 <- readNWISgwl("420125073193001", '','') data3 <- readNWISgwl("420125073193001", '','')
} }
\seealso{ \seealso{
\code{\link{importRDB1}} \code{\link{constructNWISURL}}, \code{\link{importRDB1}}
} }
...@@ -49,4 +49,7 @@ See \url{http://waterdata.usgs.gov/usa/nwis/sw} for details about surface water. ...@@ -49,4 +49,7 @@ See \url{http://waterdata.usgs.gov/usa/nwis/sw} for details about surface water.
siteNumbers <- c('01594440','040851325') siteNumbers <- c('01594440','040851325')
data <- readNWISmeas(siteNumbers) data <- readNWISmeas(siteNumbers)
} }
\seealso{
\code{\link{constructNWISURL}}, \code{\link{importRDB1}}
}
...@@ -11,8 +11,7 @@ that can be found here: \url{http://help.waterdata.usgs.gov/codes-and-parameters ...@@ -11,8 +11,7 @@ that can be found here: \url{http://help.waterdata.usgs.gov/codes-and-parameters
complete list of all current parameter codes in the USGS, use "all" as the input.} complete list of all current parameter codes in the USGS, use "all" as the input.}
} }
\value{ \value{
parameterData data frame with all information from the USGS about the particular parameter. parameterData data frame with the following information:
\tabular{lll}{ \tabular{lll}{
Name \tab Type \tab Description\cr Name \tab Type \tab Description\cr
parameter_cd \tab character \tab 5-digit USGS parameter code \cr parameter_cd \tab character \tab 5-digit USGS parameter code \cr
...@@ -30,6 +29,9 @@ This function gets the data from here: \url{http://nwis.waterdata.usgs.gov/nwis/ ...@@ -30,6 +29,9 @@ This function gets the data from here: \url{http://nwis.waterdata.usgs.gov/nwis/
\examples{ \examples{
paramINFO <- readNWISpCode(c('01075','00060','00931')) paramINFO <- readNWISpCode(c('01075','00060','00931'))
} }
\seealso{
\code{\link{importRDB1}}
}
\keyword{USGS} \keyword{USGS}
\keyword{data} \keyword{data}
\keyword{import} \keyword{import}
......
...@@ -43,11 +43,13 @@ siteInfo \tab data.frame \tab A data frame containing information on the request ...@@ -43,11 +43,13 @@ siteInfo \tab data.frame \tab A data frame containing information on the request
} }
} }
\description{ \description{
Reads peak flow from NWISweb. Reads peak flow from NWISweb. Data is retrieved from \url{http://waterdata.usgs.gov/nwis}.
Data is retrieved from \url{http://waterdata.usgs.gov/nwis}.
} }
\examples{ \examples{
siteNumbers <- c('01594440','040851325') siteNumbers <- c('01594440','040851325')
data <- readNWISpeak(siteNumbers) data <- readNWISpeak(siteNumbers)
} }
\seealso{
\code{\link{constructNWISURL}}, \code{\link{importRDB1}}
}
...@@ -45,4 +45,7 @@ siteNumber <- '01594440' ...@@ -45,4 +45,7 @@ siteNumber <- '01594440'
data <- readNWISrating(siteNumber, "base") data <- readNWISrating(siteNumber, "base")
attr(data, "RATING") attr(data, "RATING")
} }
\seealso{
\code{\link{constructNWISURL}}, \code{\link{importRDB1}}
}
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment