Nothing
# 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)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.