Merge pull request epiforecasts#436 from epiforecasts/fix-germany

fix Germany case/death data
RichardMN · Nov 29, 2021 · d1350d9 · d1350d9
2 parents 8c77b82 + 782256c
commit d1350d9
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/R/Germany.R b/R/Germany.R
@@ -94,8 +94,8 @@ Germany <- R6::R6Class("Germany",
           .data$date
         ) %>%
         summarise(
-          cases_new = as.numeric(sum(.data$cases_new > 0)),
-          deaths_new = as.numeric(sum(.data$deaths_new > 0))
+          cases_new = as.numeric(sum(.data$cases_new)),
+          deaths_new = as.numeric(sum(.data$deaths_new))
         ) %>%
         ungroup()
     },
@@ -116,8 +116,8 @@ Germany <- R6::R6Class("Germany",
           .data$level_2_region, .data$date
         ) %>%
         summarise(
-          cases_new = as.numeric(sum(.data$cases_new > 0)),
-          deaths_new = as.numeric(sum(.data$deaths_new > 0))
+          cases_new = as.numeric(sum(.data$cases_new)),
+          deaths_new = as.numeric(sum(.data$deaths_new))
         ) %>%
         ungroup()
     }