/
fibdata.R
41 lines (41 loc) · 952 Bytes
/
fibdata.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
#' All Fecal Indicator Bacteria (FIB) data as of 20240320
#'
#' All Fecal Indicator Bacteria (FIB) data as of 20240320
#'
#' @format A data frame with 76502 rows and 18 variables:
#' \describe{
#' \item{area}{chr}
#' \item{epchc_station}{num}
#' \item{class}{chr}
#' \item{SampleTime}{POSIXct}
#' \item{yr}{num}
#' \item{mo}{num}
#' \item{Latitude}{num}
#' \item{Longitude}{num}
#' \item{Total_Depth_m}{num}
#' \item{Sample_Depth_m}{num}
#' \item{ecoli}{num}
#' \item{ecoli_q}{chr}
#' \item{ecocci}{num}
#' \item{ecocci_q}{chr}
#' \item{fcolif}{num}
#' \item{fcolif_q}{chr}
#' \item{totcol}{num}
#' \item{totcol_q}{chr}
#' }
#'
#' @concept data
#'
#' @examples
#' \dontrun{
#' xlsx <- tempfile(fileext = '.xlsx')
#' fibdata <- read_importfib(xlsx, download_latest = TRUE)
#'
#' nrow(fibdata)
#' ncol(fibdata)
#'
#' save(fibdata, file = 'data/fibdata.RData', compress = 'xz')
#'
#' file.remove(xlsx)
#' }
"fibdata"