explaning why we need to remove PREV_AS_OF_DATA()

Author: rafaelcatoia

app/server.R

@@ -655,10 +655,12 @@ server <- function(input, output, session) {
   # When the target variable changes, update available forecasters, locations, and CIs to choose from
   observeEvent(input$targetVariable, {
 
-    # removing previous asofData
+    ## summaryPlot will try to use PREV_AS_OF_DATA()
+    ## since it has wrong data information, it needs to be removed
     PREV_AS_OF_DATA(NULL)
-    ## Defining Filter
     if (input$targetVariable == "Deaths") {
+    
+    ## Defining Filter
       FILTER <- DEATH_FILTER
     } else if (input$targetVariable == "Cases") {
       FILTER <- CASE_FILTER