O objetivo deste pacote é disponibilizar a base de dados sobre o volume operacional em mananciais de abastecimento público na Região Metropolitana de São Paulo (SP - Brasil). O pacote é atualizado diariamente através de um workflow com GitHub Actions.
Os dados foram obtidos no Portal dos Mananciais da SABESP.
Este pacote foi derivado de um código web scraping desenvolvido pela equipe da Curso-R, em uma live, e o código original está disponível neste link.
Este pacote foi criado no âmbito da pesquisa de doutorado de Beatriz Milz.
Caso você não utilize R, é possível fazer download da base de dados através dos seguintes links:
Os arquivos foram salvos com encoding UTF-8, e separados por ponto-e-vírgula.
Este pacote pode ser instalado através do GitHub
utilizando o seguinte código em R:
# install.packages("devtools")
devtools::install_github("beatrizmilz/mananciais")
library(mananciais)Caso você tenha conexão à internet, é possível buscar a base atualizada
usando a função dados_mananciais():
mananciais <- mananciais::dados_mananciais() Caso você não tenha conexão à internet, você pode utilizar a base disponível no pacote. Porém as mesmas estarão atualizadas até a data em que você instalou (ou atualizou) o pacote.
Abaixo segue um exemplo da base disponível:
dplyr::glimpse(mananciais)
#> Rows: 56,590
#> Columns: 8
#> $ data <date> 2024-09-18, 2024-09-18, 2024-09-18, 2024-09-18, 2…
#> $ sistema <chr> "Cantareira", "Alto Tietê", "Guarapiranga", "Cotia…
#> $ volume_porcentagem <dbl> 53.7, 49.3, 39.8, 42.7, 66.9, 27.0, 53.2, 53.9, 49…
#> $ volume_variacao <dbl> -0.2, -0.2, 0.0, -0.2, 0.2, 0.6, 0.9, -0.2, -0.2, …
#> $ volume_operacional <dbl> 527.47507, 276.43927, 68.08935, 7.04852, 75.09514,…
#> $ pluviometria_dia <dbl> 0.1, 0.2, 0.0, 0.2, 0.4, 1.0, 0.2, 0.6, 1.7, 4.8, …
#> $ pluviometria_mensal <dbl> 1.0, 2.6, 10.4, 14.2, 6.8, 16.4, 37.8, 0.9, 2.4, 1…
#> $ pluviometria_hist <dbl> 81.2, 60.3, 76.7, 75.6, 93.0, 138.7, 111.7, 81.2, …Caso queira saber o significado de cada variável, leia a documentação da base de dados ou utilize a seguinte função:
?mananciais::mananciaislibrary(magrittr)
mananciais %>%
dplyr::arrange(desc(data)) %>%
head(7) %>%
knitr::kable()| data | sistema | volume_porcentagem | volume_variacao | volume_operacional | pluviometria_dia | pluviometria_mensal | pluviometria_hist |
|---|---|---|---|---|---|---|---|
| 2024-09-18 | Cantareira | 53.7 | -0.2 | 527.47507 | 0.1 | 1.0 | 81.2 |
| 2024-09-18 | Alto Tietê | 49.3 | -0.2 | 276.43927 | 0.2 | 2.6 | 60.3 |
| 2024-09-18 | Guarapiranga | 39.8 | 0.0 | 68.08935 | 0.0 | 10.4 | 76.7 |
| 2024-09-18 | Cotia | 42.7 | -0.2 | 7.04852 | 0.2 | 14.2 | 75.6 |
| 2024-09-18 | Rio Grande | 66.9 | 0.2 | 75.09514 | 0.4 | 6.8 | 93.0 |
| 2024-09-18 | Rio Claro | 27.0 | 0.6 | 3.69373 | 1.0 | 16.4 | 138.7 |
| 2024-09-18 | São Lourenço | 53.2 | 0.9 | 47.21854 | 0.2 | 37.8 | 111.7 |