Indent comment

Co-authored-by: Sebastian Funk <[email protected]>
epiverse-trace · May 28, 2024 · 2987267 · 2987267
1 parent b91c5a0
commit 2987267
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/likelihood.R b/R/likelihood.R
@@ -151,7 +151,7 @@ likelihood <- function(chains, statistic = c("size", "length"), offspring_dist,
  if (missing(stat_threshold) && .is_epichains_summary(chains)) {
  stat_threshold <- attr(chains, "stat_threshold")
  }
- # chains must be at most stat_threshold
+  # chains must be at most stat_threshold
  if (is.finite(stat_threshold)) {
  chains <- pmin(chains, stat_threshold)
  }