R/RcppExports.R

Defines functions GetProjectionsCPP LambdaSeqCpp ObjectiveFuncCPP TMatCPP DerivCPP SolveKOSCPP CoordDesCPP KernelCPP SoftThreshCPP signCPP

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

signCPP <- function(x) {
    .Call('_biClassify_signCPP', PACKAGE = 'biClassify', x)
}

SoftThreshCPP <- function(x, lambda) {
    .Call('_biClassify_SoftThreshCPP', PACKAGE = 'biClassify', x, lambda)
}

KernelCPP <- function(x, TrainData, Sigma) {
    .Call('_biClassify_KernelCPP', PACKAGE = 'biClassify', x, TrainData, Sigma)
}

CoordDesCPP <- function(w0, Q, beta, Lambda, Epsilon, Maxniter = 1.0e7) {
    .Call('_biClassify_CoordDesCPP', PACKAGE = 'biClassify', w0, Q, beta, Lambda, Epsilon, Maxniter)
}

SolveKOSCPP <- function(YTheta, K, Gamma) {
    .Call('_biClassify_SolveKOSCPP', PACKAGE = 'biClassify', YTheta, K, Gamma)
}

DerivCPP <- function(x, Data, w0, sigmaD) {
    .Call('_biClassify_DerivCPP', PACKAGE = 'biClassify', x, Data, w0, sigmaD)
}

TMatCPP <- function(Data, Dvec, w0, sigmaTm) {
    .Call('_biClassify_TMatCPP', PACKAGE = 'biClassify', Data, Dvec, w0, sigmaTm)
}

ObjectiveFuncCPP <- function(w, Kw, Data, DVectors, YTheta, LambdaOF, GammaOF, EpsilonOF = 1e-5) {
    .Call('_biClassify_ObjectiveFuncCPP', PACKAGE = 'biClassify', w, Kw, Data, DVectors, YTheta, LambdaOF, GammaOF, EpsilonOF)
}

LambdaSeqCpp <- function(from, to, length) {
    .Call('_biClassify_LambdaSeqCpp', PACKAGE = 'biClassify', from, to, length)
}

GetProjectionsCPP <- function(TrainData, TrainCat, TestData, Dvec, w, Kw, Sigma, Gamma) {
    .Call('_biClassify_GetProjectionsCPP', PACKAGE = 'biClassify', TrainData, TrainCat, TestData, Dvec, w, Kw, Sigma, Gamma)
}

Try the biClassify package in your browser

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

biClassify documentation built on Dec. 11, 2021, 9:22 a.m.