data-raw/organdata.R

In deandevl/RplotterPkg: R Plotting Functions Using 'ggplot2'

library(usethis)
library(data.table)
library(socviz)

organdata <- data.table::as.data.table(socviz::organdata) |>
  _[, country := as.factor(country)] |>
  _[, .(country, donors)] |>
  _[, donors := round(donors, digits = 0)] |>
  na.omit()
usethis::use_data(organdata, overwrite = TRUE)