summaryrefslogtreecommitdiff
path: root/R/app.R
diff options
context:
space:
mode:
authorNaeem Model <me@nmode.ca>2024-06-09 16:01:51 +0000
committerNaeem Model <me@nmode.ca>2024-06-09 16:01:51 +0000
commit9fd931aeeba4ab7bdede1a625f64e7024c2b55aa (patch)
treeb59967df497f898e9b8f7e1cd0e345ed0ff71e36 /R/app.R
parent887c57c423ca8318d482a9f85514b3d6f281a696 (diff)
Update Shiny appHEADmaster
- 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
Diffstat (limited to 'R/app.R')
-rw-r--r--R/app.R9
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.