# oapospoisUC: One-Altered Logarithmic Distribution In VGAMdata: Data Supporting the 'VGAM' Package

 Oapospois R Documentation

## One-Altered Logarithmic Distribution

### Description

Density, distribution function, quantile function and random generation for the one-altered positive-Poisson distribution with parameter `pobs1`.

### Usage

```doapospois(x, lambda, pobs1 = 0, log = FALSE)
poapospois(q, lambda, pobs1 = 0)
qoapospois(p, lambda, pobs1 = 0)
roapospois(n, lambda, pobs1 = 0)
```

### Arguments

 `x, q, n, p` Same `Unif`. `lambda, log` Same as `Otpospois`). `pobs1` Probability of (an observed) one, called pobs1. The default value of `pobs1 = 0` corresponds to the response having a 1-truncated positive-Poisson distribution.

### Details

The probability function of Y is 1 with probability `pobs1`, else a 1-truncated positive-Poisson(lambda) distribution.

### Value

`doapospois` gives the density and `poapospois` gives the distribution function, `qoapospois` gives the quantile function, and `roapospois` generates random deviates.

### Note

The argument `pobs1` is recycled to the required length, and must have values which lie in the interval [0,1].

### Author(s)

T. W. Yee

`oapospoisson`, `Oipospois`, `Otpospois`.

### Examples

```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)
```

VGAMdata documentation built on March 18, 2022, 8:03 p.m.