Merge pull request #129 from cmu-delphi/90-dont-filter-by-time_value-in-as_of

Removed time filter in relation to version in `as_of`

Author: dajmcdon

R/archive.R

@@ -213,10 +213,8 @@ epi_archive =
             # Filter by version and return
             return(
               # Make sure to use data.table ways of filtering and selecting
-              self$DT[between(time_value,
-                              min_time_value,
-                              max_version) &
-                      version <= max_version, ] %>%
+              self$DT[time_value >= min_time_value &
+                        version <= max_version, ] %>%
               unique(by = c("geo_value", "time_value", other_keys),
                      fromLast = TRUE) %>%
               tibble::as_tibble() %>%