R/RcppExports.R

In emilsjoerup/DriftBurstHypothesis: Calculates the Test-Statistic for the Drift Burst Hypothesis

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

HACWeightC <- function(iLag) {
    .Call(`_DriftBurstHypothesis_HACWeightC`, iLag)
}

AsymptoticVarianceC <- function(vIn, iLag) {
    .Call(`_DriftBurstHypothesis_AsymptoticVarianceC`, vIn, iLag)
}

AutomaticLagSelectionC <- function(vX, dMu) {
    .Call(`_DriftBurstHypothesis_AutomaticLagSelectionC`, vX, dMu)
}

DriftBurstLoopC <- function(vPreAveraged, diffedlogprices, vTime, vTesttime, iMeanBandwidth, iVarBandwidth, iPreAverage, iAcLag) {
    .Call(`_DriftBurstHypothesis_DriftBurstLoopC`, vPreAveraged, diffedlogprices, vTime, vTesttime, iMeanBandwidth, iVarBandwidth, iPreAverage, iAcLag)
}

DriftBurstLoopCPAR <- function(vPreAveraged, diffedlogprices, vTime, vTesttime, iMeanBandwidth, iVarBandwidth, iPreAverage, iAcLag, iCores) {
    .Call(`_DriftBurstHypothesis_DriftBurstLoopCPAR`, vPreAveraged, diffedlogprices, vTime, vTesttime, iMeanBandwidth, iVarBandwidth, iPreAverage, iAcLag, iCores)
}

cfilter <- function(x, filter) {
    .Call(`_DriftBurstHypothesis_cfilter`, x, filter)
}

mldivide <- function(A, B) {
    .Call(`_DriftBurstHypothesis_mldivide`, A, B)
}