R/RcppExports.R

Defines functions allhistsecrparallelcpp allhistparallelcpp pradelloglikcpp makelookupcpp makegkParalleldcpp makegkParallelcpp makegkcpp fillkernelcpp convolvemqcpp gethcpp PCH1secrparallelcpp PCH0secrjcpp PCH1cpp

# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

PCH1cpp <- function(type, x, nc, jj, cumss, nmix, openval0, PIA0, PIAJ, intervals) {
    .Call(`_openCR_PCH1cpp`, type, x, nc, jj, cumss, nmix, openval0, PIA0, PIAJ, intervals)
}

PCH0secrjcpp <- function(type, x, nc, jj, cumss, kk, mm, cc0, PIA0, gk0, binomN, Tsk) {
    .Call(`_openCR_PCH0secrjcpp`, type, x, nc, jj, cumss, kk, mm, cc0, PIA0, gk0, binomN, Tsk)
}

PCH1secrparallelcpp <- function(x, type, grain, ncores, individual, jj, mm, nc, cumss, openval0, PIA0, PIAJ, gk0, binomN, Tsk, intervals, moveargsi, movementcode, sparsekernel, anchored, edgecode, usermodel, kernel, mqarray, cellsize) {
    .Call(`_openCR_PCH1secrparallelcpp`, x, type, grain, ncores, individual, jj, mm, nc, cumss, openval0, PIA0, PIAJ, gk0, binomN, Tsk, intervals, moveargsi, movementcode, sparsekernel, anchored, edgecode, usermodel, kernel, mqarray, cellsize)
}

gethcpp <- function(nc1, cc, nmix, nk, ss, mm, PIA, Tsk, hk) {
    .Call(`_openCR_gethcpp`, nc1, cc, nmix, nk, ss, mm, PIA, Tsk, hk)
}

convolvemqcpp <- function(j, edgecode, mqarray, kernelp, pjm) {
    .Call(`_openCR_convolvemqcpp`, j, edgecode, mqarray, kernelp, pjm)
}

fillkernelcpp <- function(kernel, kerneltype, sparsekernel, cellsize, jj, fnname, moveargsi, moveargs, normalize) {
    .Call(`_openCR_fillkernelcpp`, kernel, kerneltype, sparsekernel, cellsize, jj, fnname, moveargsi, moveargs, normalize)
}

makegkcpp <- function(cc, kk, mm, detectfn, sigmai, openval, traps, mask) {
    .Call(`_openCR_makegkcpp`, cc, kk, mm, detectfn, sigmai, openval, traps, mask)
}

makegkParallelcpp <- function(detectfn, sigmai, grain, ncores, openval, traps, mask) {
    .Call(`_openCR_makegkParallelcpp`, detectfn, sigmai, grain, ncores, openval, traps, mask)
}

makegkParalleldcpp <- function(detectfn, sigmai, grain, ncores, openval, distmat) {
    .Call(`_openCR_makegkParalleldcpp`, detectfn, sigmai, grain, ncores, openval, distmat)
}

makelookupcpp <- function(x) {
    .Call(`_openCR_makelookupcpp`, x)
}

pradelloglikcpp <- function(type, w, nc, jj, nmix, openval, PIAJ, intervals) {
    .Call(`_openCR_pradelloglikcpp`, type, w, nc, jj, nmix, openval, PIAJ, intervals)
}

allhistparallelcpp <- function(x, type, nc, CJSp1, grain, ncores, intervals, cumss, w, fi, li, openval, PIA, PIAJ) {
    .Call(`_openCR_allhistparallelcpp`, x, type, nc, CJSp1, grain, ncores, intervals, cumss, w, fi, li, openval, PIA, PIAJ)
}

allhistsecrparallelcpp <- function(x, type, mm, nc, binomN, CJSp1, grain, ncores, intervals, cumss, w, fi, li, gk, openval, PIA, PIAJ, Tsk, h, hindex, movementcode, sparsekernel, anchored, edgecode, usermodel, moveargsi, kernel, mqarray, cellsize) {
    .Call(`_openCR_allhistsecrparallelcpp`, x, type, mm, nc, binomN, CJSp1, grain, ncores, intervals, cumss, w, fi, li, gk, openval, PIA, PIAJ, Tsk, h, hindex, movementcode, sparsekernel, anchored, edgecode, usermodel, moveargsi, kernel, mqarray, cellsize)
}

Try the openCR package in your browser

Any scripts or data that you put into this service are public.

openCR documentation built on Aug. 14, 2021, 9:08 a.m.