# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
exp_counts_occu <- function(obs, no_detects, psi, p) {
.Call(`_ubms_exp_counts_occu`, obs, no_detects, psi, p)
}
exp_counts_occuRN <- function(obs, Kmin, lam, r) {
.Call(`_ubms_exp_counts_occuRN`, obs, Kmin, lam, r)
}
get_loglik_occu <- function(y, M, si, psimat, pmat, Kmin) {
.Call(`_ubms_get_loglik_occu`, y, M, si, psimat, pmat, Kmin)
}
get_loglik_pcount <- function(y, M, si, lammat, pmat, K, Kmin) {
.Call(`_ubms_get_loglik_pcount`, y, M, si, lammat, pmat, K, Kmin)
}
get_loglik_occuRN <- function(y, M, si, lammat, rmat, K, Kmin) {
.Call(`_ubms_get_loglik_occuRN`, y, M, si, lammat, rmat, K, Kmin)
}
get_loglik_multinomPois <- function(y, M, si, lammat, pmat, pi_type) {
.Call(`_ubms_get_loglik_multinomPois`, y, M, si, lammat, pmat, pi_type)
}
get_loglik_colext <- function(y, M, Tsamp, J, si, psicube, phicube, pmat, nd) {
.Call(`_ubms_get_loglik_colext`, y, M, Tsamp, J, si, psicube, phicube, pmat, nd)
}
get_loglik_occuTTD <- function(y, M, si, psimat, lammat, k, delta, ydist) {
.Call(`_ubms_get_loglik_occuTTD`, y, M, si, psimat, lammat, k, delta, ydist)
}
simz_pcount <- function(y, lam_post, p_post, K, Kmin, kvals) {
.Call(`_ubms_simz_pcount`, y, lam_post, p_post, K, Kmin, kvals)
}
simz_occuRN <- function(y, lam_post, r_post, K, Kmin, kvals) {
.Call(`_ubms_simz_occuRN`, y, lam_post, r_post, K, Kmin, kvals)
}
simz_multinom <- function(y, lam_post, p_post, K, Kmin, kvals) {
.Call(`_ubms_simz_multinom`, y, lam_post, p_post, K, Kmin, kvals)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.