From bbd4a650b5b4f7bebb769789b93e36d5d7e3197e Mon Sep 17 00:00:00 2001 From: VP Nagraj Date: Sat, 27 May 2023 08:57:23 -0400 Subject: [PATCH 1/2] fix to access hospitalization data from correct object --- R/hospital.r | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/hospital.r b/R/hospital.r index 2b54734..05ca484 100644 --- a/R/hospital.r +++ b/R/hospital.r @@ -44,7 +44,7 @@ hospitalizations <- function(surveillance_area=c("flusurv", "eip", "ihsp"), call.=FALSE) } - hosp <- list(res = res$default_data, meta = meta) + hosp <- list(res = meta$default_data, meta = meta) age_df <- setNames(hosp$meta$master_lookup, c("variable", "value_id", "parent_id", "label", "color", "enabled")) age_df <- age_df[(age_df$variable == "Age" | age_df$value_id == 0) & !is.na(age_df$value_id),] From 9a7f3a7df647166450bd0271c101d9e10b296bee Mon Sep 17 00:00:00 2001 From: VP Nagraj Date: Sat, 27 May 2023 08:57:46 -0400 Subject: [PATCH 2/2] bumping version to 1.0.0.9001 --- DESCRIPTION | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/DESCRIPTION b/DESCRIPTION index 7f86f32..a8d77a9 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -3,7 +3,7 @@ Type: Package Encoding: UTF-8 Title: Retrieve Flu Season Data from the United States Centers for Disease Control and Prevention ('CDC') 'FluView' Portal -Version: 1.0.0.9000 +Version: 1.0.0.9001 Date: 2022-11-22 Authors@R: c( person("Bob", "Rudis", email = "bob@rud.is", role = c("aut", "cre"),