R/pepseg.R

In tbep-tech/peptools: Analysis Tools for Importing, Wrangling, and Summarizing Suffolk County Water Quality Data

#' Polygon shapefile of segment boundaries
#'
#' Polygon shapefile of segment boundaries
#'
#' @format A \code{sf} object
#' @concept data
#' @examples 
#' \dontrun{
#' library(sf)
#' library(dplyr)
#' 
#' pepseg <- st_read('~/Desktop/TBEP/Peconic/PEPSegments/PEP_Seg_Reeves.shp') %>%
#'   st_transform(crs = '+proj=longlat +ellps=WGS84 +datum=WGS84 +no_defs') %>% 
#'   select(bay_segment = NewSegment) %>% 
#'   st_buffer(dist = 0) %>% 
#'   st_crop(xmin = -72.76, xmax = -71.8, ymin = 40.83, ymax = 41.2)
#'  
#' save(pepseg, file = 'data/pepseg.RData', compress = 'xz')
#' }
"pepseg"