# read raw tsv, trim the character columns and remove empty columns
unit_multiplier <- fs::path("data-raw",
"unit_multiplier",
ext = "tsv") |>
data.table::fread(encoding = "UTF-8") |>
purrr::modify_if(is.character, trimws, which = "both") |>
purrr::discard(~is.na(.x) |> all())
# save the package data in the correct format
usethis::use_data(unit_multiplier, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.