Nothing
## ----echo = FALSE-------------------------------
options(width = 50, useFancyQuotes = FALSE, prompt = " ", continue = " ")
## ----eval = FALSE-------------------------------
# install.packages("dbhydroR")
## ----eval = FALSE-------------------------------
# devtools::install_github("ropensci/dbhydroR")
## ----message=FALSE------------------------------
library(dbhydroR)
## ----eval = FALSE-------------------------------
# example(get_wq)
## ----eval = FALSE-------------------------------
# get_wq(station_id = "FLAB08", date_min = "2011-03-01",
# date_max = "2012-05-01", test_name = "CHLOROPHYLL-A, SALINE")
## ----eval = FALSE-------------------------------
# get_wq(station_id = c("FLAB08","FLAB09"), date_min = "2011-03-01",
# date_max = "2012-05-01", test_name = "CHLOROPHYLL-A, SALINE")
## ----eval = FALSE-------------------------------
# get_wq(station_id = c("FLAB0%"), date_min = "2011-03-01",
# date_max = "2012-05-01", test_name = "CHLOROPHYLL-A, SALINE")
## ----eval = FALSE-------------------------------
# get_wq(station_id = c("FLAB08","FLAB09"), date_min = "2011-03-01",
# date_max = "2012-05-01", test_name = c("CHLOROPHYLL-A, SALINE",
# "SALINITY"))
## ----eval = FALSE-------------------------------
# raw_wq <- get_wq(station_id = "FLAB08", date_min = "2011-03-01",
# date_max = "2011-05-01", test_name = "CHLOROPHYLL-A, SALINE",
# raw = TRUE)
## ----eval = FALSE-------------------------------
# clean_wq(raw_wq)
## ----eval = FALSE-------------------------------
# get_dbkey(stationid = "JBTS", category = "WEATHER", param = "WNDS",
# detail.level = "summary")
## ----eval = FALSE-------------------------------
# get_dbkey(stationid = "JBTS", category = "WEATHER", param = "WNDS",
# freq = "DA", detail.level = "full")
## ----eval = FALSE-------------------------------
# get_dbkey(stationid = "JBTS", category = "WEATHER", param = "WNDS",
# freq = "DA", stat = "MEAN", recorder = "CR10", agency = "WMD",
# detail.level = "dbkey")
## ----eval = FALSE-------------------------------
# get_hydro(dbkey = "15081",
# date_min = "2013-01-01", date_max = "2013-02-02")
## ----eval = FALSE-------------------------------
# get_hydro(date_min = "2013-01-01", date_max = "2013-02-02",
# stationid = "JBTS", category = "WEATHER", param = "WNDS",
# freq = "DA", stat = "MEAN", recorder = "CR10", agency = "WMD")
## ----eval = FALSE-------------------------------
# get_hydro(dbkey = c("15081", "15069"), date_min = "2013-01-01",
# date_max = "2013-02-02")
## ----eval = FALSE-------------------------------
# get_hydro(date_min = "2013-01-01", date_max = "2013-02-02",
# category = "WEATHER", stationid = c("JBTS", "MBTS"),
# param = "WNDS", freq = "DA", stat = "MEAN")
## ----eval = FALSE-------------------------------
# example(get_dbkey)
# example(get_hydro)
## ----eval = FALSE-------------------------------
# raw_data <- get_hydro(date_min = "2013-01-01", date_max = "2013-02-02",
# stationid = "JBTS", category = "WEATHER", param = "WNDS",
# freq = "DA", stat = "MEAN", recorder = "CR10", agency = "WMD", raw = TRUE)
#
# clean_hydro(raw_data)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.