Nothing
# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
r_boost_glasso <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, boost_umin = -5.0) {
.Call('_abclass_r_boost_glasso', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, boost_umin)
}
r_boost_glasso_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, boost_umin = -5.0) {
.Call('_abclass_r_boost_glasso_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, boost_umin)
}
r_boost_gmcp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, boost_umin = -5.0) {
.Call('_abclass_r_boost_gmcp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, boost_umin)
}
r_boost_gmcp_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, boost_umin = -5.0) {
.Call('_abclass_r_boost_gmcp_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, boost_umin)
}
r_boost_gscad <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, boost_umin = -5.0) {
.Call('_abclass_r_boost_gscad', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, boost_umin)
}
r_boost_gscad_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, boost_umin = -5.0) {
.Call('_abclass_r_boost_gscad_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, boost_umin)
}
r_boost_net <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, boost_umin = -5.0) {
.Call('_abclass_r_boost_net', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, boost_umin)
}
r_boost_net_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, boost_umin = -5.0) {
.Call('_abclass_r_boost_net_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, boost_umin)
}
cv_samples <- function(nobs, nfolds, strata) {
.Call('_abclass_cv_samples', PACKAGE = 'abclass', nobs, nfolds, strata)
}
r_hinge_boost_glasso <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_c = 0.0) {
.Call('_abclass_r_hinge_boost_glasso', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_c)
}
r_hinge_boost_glasso_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_c = 0.0) {
.Call('_abclass_r_hinge_boost_glasso_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_c)
}
r_hinge_boost_gmcp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_c = 0.0) {
.Call('_abclass_r_hinge_boost_gmcp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_c)
}
r_hinge_boost_gmcp_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_c = 0.0) {
.Call('_abclass_r_hinge_boost_gmcp_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_c)
}
r_hinge_boost_gscad <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_c = 0.0) {
.Call('_abclass_r_hinge_boost_gscad', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_c)
}
r_hinge_boost_gscad_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_c = 0.0) {
.Call('_abclass_r_hinge_boost_gscad_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_c)
}
r_hinge_boost_net <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_c = 0.0) {
.Call('_abclass_r_hinge_boost_net', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_c)
}
r_hinge_boost_net_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_c = 0.0) {
.Call('_abclass_r_hinge_boost_net_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_c)
}
r_logistic_glasso <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE) {
.Call('_abclass_r_logistic_glasso', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit)
}
r_logistic_glasso_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE) {
.Call('_abclass_r_logistic_glasso_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit)
}
r_logistic_gmcp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE) {
.Call('_abclass_r_logistic_gmcp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit)
}
r_logistic_gmcp_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE) {
.Call('_abclass_r_logistic_gmcp_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit)
}
r_logistic_gscad <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE) {
.Call('_abclass_r_logistic_gscad', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit)
}
r_logistic_gscad_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE) {
.Call('_abclass_r_logistic_gscad_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit)
}
r_logistic_net <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE) {
.Call('_abclass_r_logistic_net', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit)
}
r_logistic_net_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE) {
.Call('_abclass_r_logistic_net_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit)
}
r_lum_glasso <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_a = 1.0, lum_c = 0.0) {
.Call('_abclass_r_lum_glasso', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_a, lum_c)
}
r_lum_glasso_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_a = 1.0, lum_c = 0.0) {
.Call('_abclass_r_lum_glasso_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_a, lum_c)
}
r_lum_gmcp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_a = 1.0, lum_c = 0.0) {
.Call('_abclass_r_lum_gmcp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_a, lum_c)
}
r_lum_gmcp_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_a = 1.0, lum_c = 0.0) {
.Call('_abclass_r_lum_gmcp_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_a, lum_c)
}
r_lum_gscad <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_a = 1.0, lum_c = 0.0) {
.Call('_abclass_r_lum_gscad', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_a, lum_c)
}
r_lum_gscad_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_a = 1.0, lum_c = 0.0) {
.Call('_abclass_r_lum_gscad_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, group_weight, dgamma, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_a, lum_c)
}
r_lum_net <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_a = 1.0, lum_c = 0.0) {
.Call('_abclass_r_lum_net', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_a, lum_c)
}
r_lum_net_sp <- function(x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept = TRUE, standardize = TRUE, maxit = 1e5L, epsilon = 1e-3, varying_active_set = TRUE, verbose = 0L, nfolds = 0L, stratified = TRUE, alignment = 0L, nstages = 0L, main_fit = TRUE, lum_a = 1.0, lum_c = 0.0) {
.Call('_abclass_r_lum_net_sp', PACKAGE = 'abclass', x, y, lambda, alpha, nlambda, lambda_min_ratio, weight, intercept, standardize, maxit, epsilon, varying_active_set, verbose, nfolds, stratified, alignment, nstages, main_fit, lum_a, lum_c)
}
r_logistic_pred_prob <- function(beta, x) {
.Call('_abclass_r_logistic_pred_prob', PACKAGE = 'abclass', beta, x)
}
r_logistic_pred_prob_sp <- function(beta, x) {
.Call('_abclass_r_logistic_pred_prob_sp', PACKAGE = 'abclass', beta, x)
}
r_logistic_pred_y <- function(beta, x) {
.Call('_abclass_r_logistic_pred_y', PACKAGE = 'abclass', beta, x)
}
r_logistic_pred_y_sp <- function(beta, x) {
.Call('_abclass_r_logistic_pred_y_sp', PACKAGE = 'abclass', beta, x)
}
r_boost_pred_prob <- function(beta, x) {
.Call('_abclass_r_boost_pred_prob', PACKAGE = 'abclass', beta, x)
}
r_boost_pred_prob_sp <- function(beta, x) {
.Call('_abclass_r_boost_pred_prob_sp', PACKAGE = 'abclass', beta, x)
}
r_boost_pred_y <- function(beta, x) {
.Call('_abclass_r_boost_pred_y', PACKAGE = 'abclass', beta, x)
}
r_boost_pred_y_sp <- function(beta, x) {
.Call('_abclass_r_boost_pred_y_sp', PACKAGE = 'abclass', beta, x)
}
r_hinge_boost_pred_prob <- function(beta, x) {
.Call('_abclass_r_hinge_boost_pred_prob', PACKAGE = 'abclass', beta, x)
}
r_hinge_boost_pred_prob_sp <- function(beta, x) {
.Call('_abclass_r_hinge_boost_pred_prob_sp', PACKAGE = 'abclass', beta, x)
}
r_hinge_boost_pred_y <- function(beta, x) {
.Call('_abclass_r_hinge_boost_pred_y', PACKAGE = 'abclass', beta, x)
}
r_hinge_boost_pred_y_sp <- function(beta, x) {
.Call('_abclass_r_hinge_boost_pred_y_sp', PACKAGE = 'abclass', beta, x)
}
r_lum_pred_prob <- function(beta, x) {
.Call('_abclass_r_lum_pred_prob', PACKAGE = 'abclass', beta, x)
}
r_lum_pred_prob_sp <- function(beta, x) {
.Call('_abclass_r_lum_pred_prob_sp', PACKAGE = 'abclass', beta, x)
}
r_lum_pred_y <- function(beta, x) {
.Call('_abclass_r_lum_pred_y', PACKAGE = 'abclass', beta, x)
}
r_lum_pred_y_sp <- function(beta, x) {
.Call('_abclass_r_lum_pred_y_sp', PACKAGE = 'abclass', beta, x)
}
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.