R/loo.R

In artemis: Analysis and Simulation of Environmental DNA Experiments

##' A 'loo' method for eDNA_model objects, which is simply a wrapper
##' around \code{loo(extract_log_lik(x))}
##'
##' See ?loo::loo for more information about this calculation
##' @title Approximate leave-one-out cross-validation
##' @param x a eDNA_model object
##' @param ... additional args passed to \code{loo}
##' @return a list with the results of the calculation. 
##' @author Matt Espe
##' @export
loo.eDNA_model = function(x, ...) {
              loo(extract_log_lik(x@stanfit), ...)
          }


##' A 'waic' method for eDNA_model objects, which is simply a wrapper
##' around \code{waic(extract_log_lik(x))}
##'
##' See ?loo::waic for more information about this calculation
##' @title Approximate leave-one-out cross-validation
##' @param x a eDNA_model object
##' @param ... additional args passed to \code{waic}
##' @return a list with the results of the calculation. 
##' @author Matt Espe
##' @export
waic.eDNA_model = function(x, ...) {
    waic(extract_log_lik(x@stanfit), ...)
}