Merge pull request #94 from dkwhu/patch-1

fix mistakes in equation for CDF of HurdlePoisson
alexpghayes · Oct 8, 2022 · 32bf3ea · 32bf3ea
2 parents 6c6b5f3 + aec1de6
commit 32bf3ea
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/HurdlePoisson.R b/R/HurdlePoisson.R
@@ -144,9 +144,9 @@ rhpois <- function(n, lambda, pi) {
 #'   **Cumulative distribution function (c.d.f.)**: \eqn{P(X \le 0) = 1 - \pi} and for \eqn{k > 0}
 #'
 #'   \deqn{
-#'     P(X = k) = 1 - \pi + \pi \cdot \frac{F(k; \lambda)}{1 - F(0; \lambda)}
+#'     P(X \le k) = 1 - \pi + \pi \cdot \frac{F(k; \lambda) - F(0; \lambda)}{1 - F(0; \lambda)}
 #'   }{
-#'     P(X = k) = 1 - \pi + \pi \cdot F(k; \lambda)/(1 - F(0; \lambda))
+#'     P(X \le k) = 1 - \pi + \pi \cdot (F(k; \lambda) - F(0; \lambda))/(1 - F(0; \lambda))
 #'   }
 #'
 #'   where \eqn{F(k; \lambda)} is the c.d.f. of the \code{\link{Poisson}} distribution.