Update seealso tag references to refer to related packages and remove recipe package references (#265)

Co-authored-by: Russ Thomas <your  email>
Co-authored-by: Emil Hvitfeldt <[email protected]>

Author: ndjrt

DESCRIPTION

@@ -61,4 +61,4 @@ Config/testthat/edition: 3
 Config/usethis/last-upkeep: 2025-04-24
 Encoding: UTF-8
 Roxygen: list(markdown = TRUE)
-RoxygenNote: 7.3.2
+RoxygenNote: 7.3.3

R/collapse_cart.R

@@ -66,6 +66,7 @@
 #'   ) |>
 #'   prep()
 #' tidy(rec, number = 1)
+#' @seealso [step_collapse_stringdist()]
 #' @export
 step_collapse_cart <-
   function(

R/collapse_stringdist.R

@@ -65,6 +65,7 @@
 #'   bake(new_data = NULL)
 #'
 #' tidy(rec, 1)
+#' @seealso [step_collapse_cart()]
 #' @export
 step_collapse_stringdist <-
   function(
@@ -185,7 +186,9 @@ collapse_stringdist_impl <- function(x, dist, method, options) {
     repeat {
       group[selected] <- TRUE
       new_selected <- pairs[pairs[, 2] %in% selected, 1]
-      if (length(new_selected) == 0) break
+      if (length(new_selected) == 0) {
+        break
+      }
       pairs <- pairs[!pairs[, 2] %in% selected, , drop = FALSE]
       selected <- new_selected
     }

R/discretize_cart.R

@@ -86,8 +86,7 @@
 #' tidy(cart_rec, id = "cart splits")
 #'
 #' bake(cart_rec, ad_data_te, tau)
-#' @seealso [embed::step_discretize_xgb()], [recipes::recipe()],
-#' [recipes::prep()], [recipes::bake()]
+#' @seealso [recipes::step_discretize()], [step_discretize_xgb()]
 #' @export
 step_discretize_cart <-
   function(

R/discretize_xgb.R

@@ -99,8 +99,7 @@
 #' xgb_rec <- prep(xgb_rec, training = credit_data_tr)
 #'
 #' bake(xgb_rec, credit_data_te, Assets)
-#' @seealso [embed::step_discretize_cart()], [recipes::recipe()],
-#' [recipes::prep()], [recipes::bake()]
+#' @seealso [recipes::step_discretize()], [step_discretize_cart()]
 #' @export
 step_discretize_xgb <-
   function(

R/lencode.R

@@ -104,6 +104,7 @@
 #' bake(reencoded, grants_other)
 #'
 #' tidy(reencoded, 1)
+#' @seealso [step_lencode_bayes()], [step_lencode_glm()], [step_lencode_mixed()]
 #' @export
 step_lencode <-
   function(

R/lencode_bayes.R

@@ -104,6 +104,7 @@
 #' reencoded <- recipe(class ~ sponsor_code, data = grants_other) |>
 #'   step_lencode_bayes(sponsor_code, outcome = vars(class))
 #' }
+#' @seealso [step_lencode()], [step_lencode_glm()], [step_lencode_mixed()]
 #' @export
 step_lencode_bayes <-
   function(

R/lencode_glm.R

@@ -78,6 +78,7 @@
 #' reencoded <- recipe(class ~ sponsor_code, data = grants_other) |>
 #'   step_lencode_glm(sponsor_code, outcome = vars(class))
 #' }
+#' @seealso [step_lencode()], [step_lencode_bayes()], [step_lencode_mixed()]
 #' @export
 step_lencode_glm <-
   function(

R/lencode_mixed.R

@@ -91,6 +91,7 @@
 #' reencoded <- recipe(class ~ sponsor_code, data = grants_other) |>
 #'   step_lencode_mixed(sponsor_code, outcome = vars(class))
 #' }
+#' @seealso [step_lencode()], [step_lencode_bayes()], [step_lencode_glm()]
 #' @export
 step_lencode_mixed <-
   function(

R/pca_sparse.R

@@ -64,7 +64,9 @@
 #'
 #' @template case-weights-not-supported
 #'
-#' @seealso [step_pca_sparse_bayes()]
+#' @seealso [recipes::step_pca()], [recipes::step_kpca()],
+#'   [recipes::step_kpca_poly()], [recipes::step_kpca_rbf()],
+#'   [step_pca_sparse_bayes()], [step_pca_truncated()]
 #' @examplesIf rlang::is_installed(c("modeldata", "ggplot2"))
 #' library(recipes)
 #' library(ggplot2)