Closed gorkang closed 4 years ago
# shinyWidgets::switchInput(inputId = "show_both", label = "Show deaths alongside", labelWidth = "80%", value = FALSE, size = "mini", width = '100%'),
# # show both cases and deaths simultaneously
# if (input$show_both == TRUE) {
# p_temp = p_temp + geom_line(aes(x = days_after_100, y = deaths_sum), linetype = "dashed", alpha = .7) +
# ggrepel::geom_label_repel(aes(x = days_after_100, y = deaths_sum, label = name_end), show.legend = FALSE, segment.color = "grey", segment.size = .3, alpha = .7)
# }
With CFR this is not needed.
[ ] Cases
[ ] Deaths
[ ] Both
It's useful to compare countries in terms of delay between cases and deaths...