R/tabela_reservatorios_ONS.R

In brunomioto/reservatoriosBR: Get Brazilian reservoirs data

#' Tabela com dados dos reservatorios brasileiros apresentados pela ONS
#'
#' Um dataset contendo os atributos dos principais reservatorios brasileiros apresentados pela ONS.
#'
#' @source ANA (Antônio Augusto, Diego Pena e Théo Albuquerque) e <http://www.ons.org.br/paginas/energia-agora/reservatorios>, editado por Bruno Mioto. obtido em 2021-10-22.
#'
#' @export
#'
#' @format Um dataframe com 39 observacoes e 12 variaveis
#' \describe{
#'
#'   \item{subsistema}{subsistema-ONS a qual o reservatorio pertence}
#'   \item{reservatorio}{o nome do reservatorio}
#'   \item{codigo}{o codigo do reservatorio segundo o SAR}
#'   \item{res_latitude}{latitude do reservatorio}
#'   \item{res_longitude}{longitude do reservatorio}
#'   \item{municipio}{municipio do reservatorio}
#'   \item{codigo_municipio_ibge}{codigo do municipio na base do ibge}
#'   \item{estado_nome}{estado em forma de nome}
#'   \item{estado_sigla}{estado em forma de sigla}
#'   \item{rio}{nome do rio}
#'   \item{sub_bacia}{sub-bacia do rio}
#'   \item{bacia}{bacia hidrográfica do rio}
#' }
#'
#' @examples
#' tabela_reservatorios_ONS()

tabela_reservatorios_ONS <- function(){
  readr::read_csv(
    file =
      "https://github.com/brunomioto/reservatoriosBR/raw/v1.1/inst/extdata/tabela_reservatorios_ONS.csv",
    locale = readr::locale(
      encoding = "UTF-8",
    ),
    col_types = "cciddciccccc",
    trim_ws = TRUE,
    progress = FALSE
  )
}