R/dprocess-pomp.R

In pomp: Statistical Inference for Partially Observed Markov Processes

## evaluate the process model density function

dprocess.internal <- function (object, x, times, params, log = FALSE, .getnativesymbolinfo = TRUE, ...) {
  pompLoad(object)
  rv <- .Call(do_dprocess,object,x,times,params,log,.getnativesymbolinfo)
  pompUnload(object)
  rv
}
  

setMethod("dprocess",
          signature=signature("pomp"),
          definition = function (object, x, times, params, log = FALSE, ...)
          dprocess.internal(object=object,x=x,times=times,params=params,log=log,...)
          )