Zero-truncated Poisson probability function

pf_ztp(n, theta)

Arguments

n

Function support, with \(n = 1, 2, \cdots\).

theta

Theta parameter, such that \(\theta > 0\).

Value

Calculated probability (vector)

Examples

sapply( X = 1L:1000L, FUN = function(i) pf_ztp(n = i, theta = 1.2) ) %>% sum
#> [1] 1