Oapospois | R Documentation |
Density, distribution function, quantile function and random
generation for the one-altered positive-Poisson distribution
with parameter pobs1
.
doapospois(x, lambda, pobs1 = 0, log = FALSE)
poapospois(q, lambda, pobs1 = 0)
qoapospois(p, lambda, pobs1 = 0)
roapospois(n, lambda, pobs1 = 0)
x , q , n , p |
Same |
lambda , log |
Same as |
pobs1 |
Probability of (an observed) one, called |
The probability function of Y
is 1 with probability pobs1
,
else a 1-truncated
positive-Poisson(lambda)
distribution.
doapospois
gives the density and
poapospois
gives the distribution function,
qoapospois
gives the quantile function, and
roapospois
generates random deviates.
The argument pobs1
is recycled to the required length, and
must have values which lie in the interval [0,1]
.
T. W. Yee
oapospoisson
,
Oipospois
,
Otpospois
.
lambda <- 3; pobs1 <- 0.30; x <- (-1):7
doapospois(x, lambda = lambda, pobs1 = pobs1)
table(roapospois(100, lambda = lambda, pobs1 = pobs1))
## Not run: x <- 0:10
barplot(rbind(doapospois(x, lambda = lambda, pobs1 = pobs1),
dpospois(x, lambda = lambda)),
beside = TRUE, col = c("blue", "orange"), cex.main = 0.7, las = 1,
ylab = "Probability", names.arg = as.character(x),
main = paste("OAPP(lambda = ", lambda, ", pobs1 = ", pobs1,
") [blue] vs", " PosPoisson(lambda = ", lambda,
") [orange] densities", sep = ""))
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.