increase weibull lower bound

epiverse-trace · May 1, 2024 · 8983aab · 8983aab
1 parent 1c6345e
commit 8983aab
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/extract_param.R b/R/extract_param.R
@@ -221,7 +221,7 @@ extract_param <- function(type = c("percentiles", "range"),
   }
   if (distribution == "weibull") {
     names(param) <- c("shape", "scale")
-    lower <- c(1e-10, 1e-10)
+    lower <- c(1e-5, 1e-5)
   }
   if (distribution == "norm") {
     names(param) <- c("mean", "sd")