Update Shiny app

- Remove template/logic for single data entry
- Change 'Add estimators' to 'About estimators'; adding estimators and viewing estimates are now done in the same tab
- Swap rows and columns in estimates table (estimators as row names, datasets as column names)
- Add a separate column for the serial interval to the estimates table
- Add plots for daily and weekly data using the Plotly library
- Remove italics from the subscript in all occurences of 'R_0'
- Fix code/text formatting

1 files changed, 6 insertions, 3 deletions

diff --git a/R/app.R b/R/app.R
index 01f35b4..23e32ab 100644
--- a/R/app.R
+++ b/R/app.R
@@ -6,15 +6,18 @@
 app <- function() {
   missing_pkgs <- c()
   # Check for any missing, required packages.
-  if (!requireNamespace("shiny", quietly = TRUE)) {
-    missing_pkgs <- c(missing_pkgs, "shiny")
-  }
   if (!requireNamespace("bslib", quietly = TRUE)) {
     missing_pkgs <- c(missing_pkgs, "bslib")
   }
+  if (!requireNamespace("shiny", quietly = TRUE)) {
+    missing_pkgs <- c(missing_pkgs, "shiny")
+  }
   if (!requireNamespace("DT", quietly = TRUE)) {
     missing_pkgs <- c(missing_pkgs, "DT")
   }
+  if (!requireNamespace("plotly", quietly = TRUE)) {
+    missing_pkgs <- c(missing_pkgs, "plotly")
+  }
 
   # If any of the required packages are missing,
   # prompt the user to install them.