R/RcppExports.R

Defines functions scoref_oldc scoref_c recursion_matrix recursion_linreg_c backtrace_c na_matrix

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

na_matrix <- function(n) {
    .Call('_dpseg_na_matrix', PACKAGE = 'dpseg', n)
}

backtrace_c <- function(imax, jumps = 0L) {
    .Call('_dpseg_backtrace_c', PACKAGE = 'dpseg', imax, jumps)
}

recursion_linreg_c <- function(x, y, maxl, jumps = 0L, P = 0, minl = 3L, S0 = 1.0, type = "var", storem = 0L, storev = 1L, scoref = "dummy") {
    .Call('_dpseg_recursion_linreg_c', PACKAGE = 'dpseg', x, y, maxl, jumps, P, minl, S0, type, storem, storev, scoref)
}

recursion_matrix <- function(x, y, maxl, jumps = 0L, P = 0, minl = 3L, S0 = 1.0, type = "matrix", storem = 0L, storev = 1L, scoref = "dummy") {
    .Call('_dpseg_recursion_matrix', PACKAGE = 'dpseg', x, y, maxl, jumps, P, minl, S0, type, storem, storev, scoref)
}

scoref_c <- function(x, y, minl, maxl, P, S0, type = "var", jumps = 1L, storem = 0L, storev = 1L) {
    .Call('_dpseg_scoref_c', PACKAGE = 'dpseg', x, y, minl, maxl, P, S0, type, jumps, storem, storev)
}

scoref_oldc <- function(x, y, minl, maxl, P, S0, type = "var", jumps = 0L, storem = 0L, storev = 1L) {
    .Call('_dpseg_scoref_oldc', PACKAGE = 'dpseg', x, y, minl, maxl, P, S0, type, jumps, storem, storev)
}

Try the dpseg package in your browser

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

dpseg documentation built on Aug. 17, 2020, 5:06 p.m.