Remove line overriding dat object class

EpiModel · Jul 8, 2023 · 86decab · 86decab
1 parent 8d98c31
commit 86decab
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/R/mod-init.R b/R/mod-init.R
@@ -83,7 +83,6 @@ init_covid_corporate <- function(x, param, init, control, s) {
   ## Get initial prevalence
   dat <- prevalence_covid_corporate(dat, at = 1)
 
-  class(dat) <- "dat"
   return(dat)
 }