fitted_zip_internal = function(X, W, beta, zeta, off.x, off.w)
{
list(
lambda = as.numeric(exp(X %*% beta + off.x)),
p = as.numeric(plogis(W %*% zeta + off.w))
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.