Mean of the GAITD Combo Density

Returns the mean of a 1- or 2-parameter GAITD combo probability mass function.

meangaitd(theta.p, fam = c("pois", "log", "zeta"),
    a.mix = NULL, i.mix = NULL, d.mix = NULL,
    a.mlm = NULL, i.mlm = NULL, d.mlm = NULL,
    truncate = NULL, max.support = Inf,
    pobs.mix = 0, pobs.mlm = 0,
    pstr.mix = 0, pstr.mlm = 0,
    pdip.mix = 0, pdip.mlm = 0, byrow.aid = FALSE,
    theta.a = theta.p, theta.i = theta.p, theta.d = theta.p, ...)

Arguments

theta.p

Same as dgaitdplot; usually of length 1 but may be of length 2.

fam

Same as dgaitdplot. The default is the first one. All other choices are listed in that vector.

a.mix, i.mix, a.mlm, i.mlm

Same as dgaitdplot.

d.mix, d.mlm

Same as dgaitdplot.

truncate, max.support

Same as dgaitdplot.

pobs.mix, pobs.mlm, byrow.aid

Same as dgaitdplot.

pstr.mix, pstr.mlm, pdip.mix, pdip.mlm

Same as dgaitdplot.

theta.a, theta.i, theta.d

Same as dgaitdplot.

...

Currently unused.

Details

This function returns the mean of the PMF of the GAITD combo model. Many of its arguments are the same as dgaitdplot. More functionality may be added in the future, such as returning the variance.

Value

The mean.

Author

T. W. Yee.

Note

This utility function may change a lot in the future.

Examples

i.mix <- seq(0, 15, by = 5)
lambda.p <- 10
meangaitd(lambda.p, a.mix = i.mix + 1, i.mix = i.mix,
          max.support = 17, pobs.mix = 0.1, pstr.mix = 0.1)
#> [1] 9.868472