Update R/mixing.R

Co-authored-by: Paul Liétar <[email protected]>
mrc-ide · Jul 1, 2024 · 7bd8c0d · 7bd8c0d
1 parent 24a0253
commit 7bd8c0d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/mixing.R b/R/mixing.R
@@ -13,7 +13,7 @@ create_transmission_mixer <- function(
   function (timestep) {
     n_pops <- length(variables)
     rdt_positive <- vnapply(
-      seq(n_pops),
+      seq_len(n_pops),
       function(i) {
         rdt_detectable(variables[[i]], parameters[[i]], timestep)
       }