Skip to content

Commit

Permalink
fix: renamed toy dataset
Browse files Browse the repository at this point in the history
  • Loading branch information
dnldelarosa committed Dec 2, 2023
1 parent e5ced93 commit 7d311f5
Show file tree
Hide file tree
Showing 9 changed files with 776 additions and 13 deletions.
2 changes: 1 addition & 1 deletion DESCRIPTION
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
Package: sfDR
Title: Simple Features for Dominican Republic Administrative Boundaries
Version: 0.1.3
Version: 0.1.4
Authors@R:
c(person(given = "Daniel E.",
family = "de la Rosa",
Expand Down
4 changes: 2 additions & 2 deletions R/data.R
Original file line number Diff line number Diff line change
@@ -1,9 +1,9 @@
#' Percentage distribution by provinces of remittances received by the Dominican Republic
#'
#' @format ## `remesas_provincias`
#' @format ## `remittance_by_province`
#' \describe{
#' \item{province}{Full name of the province}
#' \item{percentage}{Percentage of the total remittances received in 2010}
#' }
#' @source <https://www.bancentral.gov.do/a/d/2532-sector-externo>
'remesas_provincias'
'remittance_by_province'
4 changes: 2 additions & 2 deletions README.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -61,7 +61,7 @@ The original simple features dataset only includes the PROV_ID variable. Additio

```{r}
datos <- DR_PROV_SF |>
left_join(remesas_provincias, by = join_by('PROV_NAME' == 'province'))
left_join(remittance_by_province, by = join_by('PROV_NAME' == 'province'))
datos %>%
sf::st_drop_geometry()
Expand All @@ -87,7 +87,7 @@ library(ggplot2)
DR_PROV %>%
sf::st_as_sf() %>%
left_join(dr_province) %>%
left_join(remesas_provincias, by = join_by('PROV_NAME' == 'province')) %>%
left_join(remittance_by_province, by = join_by('PROV_NAME' == 'province')) %>%
ggplot() +
geom_sf(aes(fill = percentage)) +
theme_void()
Expand Down
Loading

0 comments on commit 7d311f5

Please sign in to comment.