From a00500a08f7eed8fd86a87ac656c70b8a2b80c4a Mon Sep 17 00:00:00 2001 From: Lextuga007 Date: Thu, 17 Oct 2024 18:50:09 +0100 Subject: [PATCH] Added code to create rda file --- data-raw/ons-mortality.R | 2 ++ data-raw/ons_uk_population_2023.R | 4 +++- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/data-raw/ons-mortality.R b/data-raw/ons-mortality.R index 65f8c81..d206575 100644 --- a/data-raw/ons-mortality.R +++ b/data-raw/ons-mortality.R @@ -407,3 +407,5 @@ ons_mortality %>% slice(1) unlink("working_files", recursive = TRUE) + +usethis::use_data(ons_mortality, overwrite = TRUE) diff --git a/data-raw/ons_uk_population_2023.R b/data-raw/ons_uk_population_2023.R index 7d00665..55978a8 100644 --- a/data-raw/ons_uk_population_2023.R +++ b/data-raw/ons_uk_population_2023.R @@ -27,8 +27,10 @@ population_data_2023_m <- population_data_2023_m |> select(!`All ages`) |> pivot_longer(`0`:`90+`, names_to = "age", values_to = "count") -population_data_combined <- bind_rows( +ons_uk_population_2023 <- bind_rows( females = population_data_2023_f, males = population_data_2023_m, .id = "sex" ) + +usethis::use_data(ons_uk_population_2023, overwrite = TRUE)