Predict oocytes per reproductive polyp using posterior predict (ZIP model)

Predict oocytes per reproductive polyp using posterior predict (ZIP model)

Usage

predict_oocytes(newdata, draws, draw_id = 1)

Arguments

newdata

A data.frame with species and width columns.

draws

Posterior draws from posterior_coeffs_oocyte_output.

draw_id

Integer index of the draw to use.

Value

Numeric vector of expected counts.

Examples

if (FALSE) { # \dontrun{
newdata <- expand.grid(species = levels(coralsize$species), width = seq(0,50,5))
newdata$oocytes <- predict_oocytes(newdata, posterior_coeffs_oocyte_output, draw_id = 100)
} # }