From 7d63d5782d3442376a51496334e86991c86571bb Mon Sep 17 00:00:00 2001
From: Edgar-Zamora <edgarzamora2012@hotmail.com>
Date: Fri, 1 Aug 2025 14:51:17 -0700
Subject: [PATCH 1/3] Update example to use new step function

---
 R/nnmf.R | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/R/nnmf.R b/R/nnmf.R
index bafd996ef..c35f838b5 100644
--- a/R/nnmf.R
+++ b/R/nnmf.R
@@ -68,7 +68,11 @@
 #' # rec <- recipe(HHV ~ ., data = biomass) |>
 #' #   update_role(sample, new_role = "id var") |>
 #' #   update_role(dataset, new_role = "split variable") |>
-#' #   step_nnmf(all_numeric_predictors(), num_comp = 2, seed = 473, num_run = 2) |>
+#' #   step_nnmf_sparse(
+#' #     all_numeric_predictors(),
+#' #     num_comp = 2,
+#' #     seed = 473) |>
+#' #   #step_nnmf(all_numeric_predictors(), num_comp = 2, seed = 473, num_run = 2) |>
 #' #   prep(training = biomass)
 #' #
 #' # bake(rec, new_data = NULL)

From 088bc3be9bbc3791cb6ca94cf50677aa0f35a384 Mon Sep 17 00:00:00 2001
From: Edgar-Zamora <edgarzamora2012@hotmail.com>
Date: Fri, 1 Aug 2025 14:52:09 -0700
Subject: [PATCH 2/3] add internal keyword

---
 R/nnmf.R | 1 +
 1 file changed, 1 insertion(+)

diff --git a/R/nnmf.R b/R/nnmf.R
index c35f838b5..fc5430a5e 100644
--- a/R/nnmf.R
+++ b/R/nnmf.R
@@ -15,6 +15,7 @@
 #'
 #' @inheritParams step_pca
 #' @inheritParams step_center
+#' @keywords internal
 #' @param num_run A positive integer for the number of computations runs used to
 #'   obtain a consensus projection.
 #' @param options A list of options to `nmf()` in the NMF package by way of the

From db7a8db48a13acad914844860a91f1e646a0632f Mon Sep 17 00:00:00 2001
From: Edgar-Zamora <edgarzamora2012@hotmail.com>
Date: Fri, 1 Aug 2025 14:52:32 -0700
Subject: [PATCH 3/3] upkeep step_nnmf docs

---
 man/step_nnmf.Rd | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/man/step_nnmf.Rd b/man/step_nnmf.Rd
index 2e4fd0961..0ea875f32 100644
--- a/man/step_nnmf.Rd
+++ b/man/step_nnmf.Rd
@@ -129,7 +129,11 @@ data(biomass, package = "modeldata")
 # rec <- recipe(HHV ~ ., data = biomass) |>
 #   update_role(sample, new_role = "id var") |>
 #   update_role(dataset, new_role = "split variable") |>
-#   step_nnmf(all_numeric_predictors(), num_comp = 2, seed = 473, num_run = 2) |>
+#   step_nnmf_sparse(
+#     all_numeric_predictors(),
+#     num_comp = 2,
+#     seed = 473) |>
+#   #step_nnmf(all_numeric_predictors(), num_comp = 2, seed = 473, num_run = 2) |>
 #   prep(training = biomass)
 #
 # bake(rec, new_data = NULL)
@@ -158,3 +162,4 @@ Other multivariate transformation steps:
 \code{\link{step_spatialsign}()}
 }
 \concept{multivariate transformation steps}
+\keyword{internal}