Classification Logistic Regression Learner
Source:R/learner_stepPlr_classif_plr.R
mlr_learners_classif.stepPlr.RdLogistic regression with a quadratic penalization on the coefficient.
Calls stepPlr::plr() from stepPlr.
Parameters
| Id | Type | Default | Levels | Range |
| cp | character | aic | aic, bic | - |
| lambda | numeric | 1e-04 | \([0, \infty)\) | |
| offset.coefficients | untyped | - | - | |
| offset.subset | untyped | - | - |
References
Park, Young M, Hastie, Trevor (2007). “Penalized logistic regression for detecting gene interactions.” Biostatistics, 9(1), 30-50. ISSN 1465-4644. doi:10.1093/biostatistics/kxm010 . https://doi.org/10.1093/biostatistics/kxm010.
See also
as.data.table(mlr_learners)for a table of available Learners in the running session (depending on the loaded packages).Chapter in the mlr3book: https://mlr3book.mlr-org.com/chapters/chapter2/data_and_basic_modeling.html#sec-learners
mlr3learners for a selection of recommended learners.
mlr3cluster for unsupervised clustering learners.
mlr3pipelines to combine learners with pre- and postprocessing steps.
mlr3tuning for tuning of hyperparameters, mlr3tuningspaces for established default tuning spaces.
Super classes
mlr3::Learner -> mlr3::LearnerClassif -> LearnerClassifStepPlr
Methods
Inherited methods
mlr3::Learner$base_learner()mlr3::Learner$configure()mlr3::Learner$encapsulate()mlr3::Learner$format()mlr3::Learner$help()mlr3::Learner$predict()mlr3::Learner$predict_newdata()mlr3::Learner$print()mlr3::Learner$reset()mlr3::Learner$selected_features()mlr3::Learner$train()mlr3::LearnerClassif$predict_newdata_fast()
LearnerClassifStepPlr$new()
Creates a new instance of this R6 class.
Usage
LearnerClassifStepPlr$new()Examples
# Define the Learner
learner = lrn("classif.stepPlr")
print(learner)
#>
#> ── <LearnerClassifStepPlr> (classif.stepPlr): Logistic Regression with a L2 Pena
#> • Model: -
#> • Parameters: list()
#> • Packages: mlr3 and stepPlr
#> • Predict Types: [response] and prob
#> • Feature Types: logical, integer, and numeric
#> • Encapsulation: none (fallback: -)
#> • Properties: twoclass and weights
#> • Other settings: use_weights = 'use', predict_raw = 'FALSE'
# Define a Task
task = tsk("sonar")
# Create train and test set
ids = partition(task)
# Train the learner on the training ids
learner$train(task, row_ids = ids$train)
print(learner$model)
#>
#> Call:
#> stepPlr::plr(x = data, y = y)
#>
#> Coefficients:
#> Intercept V1 V10 V11 V12 V13 V14 V15
#> 20.22923 -52.74380 20.92159 -24.24730 15.95335 -31.18342 -5.46456 15.62578
#> V16 V17 V18 V19 V2 V20 V21 V22
#> -15.40176 41.99366 -25.76379 -10.56014 -32.99045 14.52066 8.82949 -23.35614
#> V23 V24 V25 V26 V27 V28 V29 V3
#> 19.28126 -35.27044 23.69278 -2.73245 -6.59965 -7.57326 19.14737 71.89486
#> V30 V31 V32 V33 V34 V35 V36 V37
#> -31.59773 37.73174 -16.93560 8.93654 -6.47582 -15.18334 23.23170 2.69846
#> V38 V39 V4 V40 V41 V42 V43 V44
#> -8.12304 -7.65754 -51.49053 5.10483 24.76904 -27.66748 14.12568 -23.47202
#> V45 V46 V47 V48 V49 V5 V50 V51
#> 17.21276 0.63632 -12.06641 -46.48579 -38.18751 -9.27869 37.66270 -85.11612
#> V52 V53 V54 V55 V56 V57 V58 V59
#> -61.60228 -50.42899 -64.16046 -4.79508 11.94208 54.79331 -24.79822 -47.36154
#> V6 V60 V7 V8 V9
#> -22.85042 -22.94665 48.29764 5.09484 -27.97800
#>
#> Null deviance: 190.61 on 138 degrees of freedom
#> Residual deviance: 18.67 on 92.53 degrees of freedom
#> Score: deviance + 4.9 * df = 247.98
# Make predictions for the test rows
predictions = learner$predict(task, row_ids = ids$test)
# Score the predictions
predictions$score()
#> classif.ce
#> 0.2173913