From 9adb3b64f0e304b9eeeb2be9d45fddd940c601fb Mon Sep 17 00:00:00 2001 From: Frances Lin Date: Fri, 5 Sep 2025 10:29:51 -0700 Subject: [PATCH 1/3] Get rid of @mode in #' @examplesIf --- R/score-info_gain.R | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/R/score-info_gain.R b/R/score-info_gain.R index e800a82..e4cc19a 100644 --- a/R/score-info_gain.R +++ b/R/score-info_gain.R @@ -110,13 +110,10 @@ class_score_info_gain <- S7::new_class( #' ames_subset <- ames_subset |> #' dplyr::mutate(Sale_Price = log10(Sale_Price)) #' -#' regression_task <- score_info_gain -#' regression_task@mode <- "regression" -#' -#' ames_info_gain_regression_task_res <- -#' regression_task |> +#' ames_info_gain_res <- +#' score_info_gain |> #' fit(Sale_Price ~ ., data = ames_subset) -#' ames_info_gain_regression_task_res@results +#' ames_info_gain_res@results #' @export score_info_gain <- class_score_info_gain( From c3db454e742c93e61de58b45aa16308d5de152f1 Mon Sep 17 00:00:00 2001 From: Frances Lin Date: Fri, 5 Sep 2025 11:00:02 -0700 Subject: [PATCH 2/3] Cmd + Shift + D --- man/score_info_gain.Rd | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/man/score_info_gain.Rd b/man/score_info_gain.Rd index 6961240..2b5e99e 100644 --- a/man/score_info_gain.Rd +++ b/man/score_info_gain.Rd @@ -118,13 +118,10 @@ ames_subset <- modeldata::ames |> ames_subset <- ames_subset |> dplyr::mutate(Sale_Price = log10(Sale_Price)) -regression_task <- score_info_gain -regression_task@mode <- "regression" - -ames_info_gain_regression_task_res <- - regression_task |> +ames_info_gain_res <- + score_info_gain |> fit(Sale_Price ~ ., data = ames_subset) -ames_info_gain_regression_task_res@results +ames_info_gain_res@results \dontshow{\}) # examplesIf} } \seealso{ From ece13ac2a84265d300fead3bd2fd5c00c5381c86 Mon Sep 17 00:00:00 2001 From: Frances Lin Date: Fri, 5 Sep 2025 13:04:45 -0700 Subject: [PATCH 3/3] Update a bunch of packages locally --- R/score-info_gain.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/score-info_gain.R b/R/score-info_gain.R index e4cc19a..de50925 100644 --- a/R/score-info_gain.R +++ b/R/score-info_gain.R @@ -201,7 +201,7 @@ get_info_gain <- function(object, data, outcome) { x = X, y = y, type = object@score_type, - equal = object@mode == "regression" # Set = TRUE for numeric outcome + equal = object@mode == "regression" # Set equal = TRUE for numeric outcome ), silent = TRUE )