diff --git a/R/utils.R b/R/utils.R index a487ea3..a8b5d7f 100644 --- a/R/utils.R +++ b/R/utils.R @@ -85,7 +85,7 @@ parse_event_time <- function(time, format = c("R", "T")) { #' time_to_numeric <- function(time, origin = NULL) { - if (!inherits(time, c("character", "POSIXct", "numeric"))) { + if (!inherits(time, c("character", "POSIXct", "numeric", "integer"))) { stop("Invalid time format for parameter 'time'") }