| # Load the necessary library | |
| library(stars) | |
| # Set seed for reproducibility | |
| set.seed(123) | |
| # Define grid dimensions | |
| nx <- 100 # Number of columns (x-axis) | |
| ny <- 100 # Number of rows (y-axis) |
From Wickham, H. R Packages & Saskia O. blog
devtools::test() for unit-testingdevtools::document() for doumentingdevtools::check() for local checkdevtools::check(manual = TRUE, remote = TRUE, incoming = TRUE) to include URL checksdevtools::spell_check() for typosrhub::check_for_cran() for CRAN checks
| library(sf) | |
| library(tidyverse) | |
| library(stringi) | |
| # Leer resultados recopilados por Gabo Gaona de https://actascne.andresarauz.ec/ | |
| res_url = "https://gitlab.com/gavg712/elecciones-ecuador-2021/-/raw/master/data/csv/cne_ec_2021_presidencia.zip" | |
| res_file = "data/cne_ec_2021_presidencia.zip" | |
| download.file(res_url, destfile = res_file) | |
| unzip(res_file) |
| library(rtweet) | |
| library(tidyverse) | |
| library(lubridate) | |
| library(gganimate) | |
| # Extraer tweets de Carlos Oporto | |
| resultados = search_tweets( | |
| q = "Resultados AND Oficiales AND CNE AND carlosoporto", | |
| include_rts = F | |
| ) |
| library(rtweet) | |
| library(tidyverse) | |
| library(lubridate) | |
| library(gganimate) | |
| # Extraer tweets de Andrea Gomez | |
| reconteo = search_tweets( | |
| q = "angiegomeza AND Actualización AND Diferencia", | |
| include_rts = F | |
| ) |