Zageom | R Documentation |
Density, distribution function, quantile function and random
generation for the zero-altered geometric distribution with
parameter pobs0
.
dzageom(x, prob, pobs0 = 0, log = FALSE)
pzageom(q, prob, pobs0 = 0)
qzageom(p, prob, pobs0 = 0)
rzageom(n, prob, pobs0 = 0)
x , q |
vector of quantiles. |
p |
vector of probabilities. |
n |
number of observations.
If |
prob , log |
Parameters from the ordinary geometric distribution
(see |
pobs0 |
Probability of (an observed) zero, called |
The probability function of Y
is 0 with probability
pobs0
, else a positive geometric(prob) distribution.
dzageom
gives the density and
pzageom
gives the distribution function,
qzageom
gives the quantile function, and
rzageom
generates random deviates.
The argument pobs0
is recycled to the required length,
and must have values which lie in the interval [0,1]
.
T. W. Yee
zageometric
,
zigeometric
,
rposgeom
.
prob <- 0.35; pobs0 <- 0.05; x <- (-1):7
dzageom(x, prob = prob, pobs0 = pobs0)
table(rzageom(100, prob = prob, pobs0 = pobs0))
## Not run: x <- 0:10
barplot(rbind(dzageom(x, prob = prob, pobs0 = pobs0),
dgeom(x, prob = prob)), las = 1,
beside = TRUE, col = c("blue", "orange"), cex.main = 0.7,
ylab = "Probability", names.arg = as.character(x),
main = paste("ZAG(prob = ", prob, ", pobs0 = ", pobs0,
") [blue] vs", " Geometric(prob = ", prob,
") [orange] densities", sep = ""))
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.