Rename to filter_obs_by_stime()

epinowcast · May 15, 2024 · 5b176fc · 5b176fc
1 parent d0ed63e
commit 5b176fc
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/observe.R b/R/observe.R
@@ -28,7 +28,7 @@ observe_process <- function(linelist) {
 #' 
 #' @family observe
 #' @export
-filter_obs_by_obs_time <- function(linelist, obs_time) {
+filter_obs_by_stime <- function(linelist, obs_time) {
   clinelist <- data.table::copy(linelist)
   clinelist[, obs_at := obs_time]
   clinelist[, obs_time := obs_time - ptime]