small fixes

Author: topepo

man/details_boost_tree_lightgbm.Rd

@@ -21,7 +21,7 @@ test_that('model fitting', {
 
   set.seed(352)
   dat <-
-    lending_club |>
+    modeldata::lending_club |>
     dplyr::group_by(Class) |>
     dplyr::sample_n(500) |>
     dplyr::ungroup() |>
@@ -98,7 +98,7 @@ test_that('classification prediction', {
 
   set.seed(352)
   dat <-
-    lending_club |>
+    modeldata::lending_club |>
     dplyr::group_by(Class) |>
     dplyr::sample_n(500) |>
     dplyr::ungroup() |>
@@ -155,7 +155,7 @@ test_that('classification probabilities', {
 
   set.seed(352)
   dat <-
-    lending_club |>
+    modeldata::lending_club |>
     dplyr::group_by(Class) |>
     dplyr::sample_n(500) |>
     dplyr::ungroup() |>

man/details_discrim_linear_sda.Rd

@@ -191,7 +191,7 @@ test_that('classification', {
     glm_mars <-
       mars(mode = "classification")  |>
       set_engine("earth") |>
-      fit(Class ~ ., data = lending_club[-(1:5),])
+      fit(Class ~ ., data = modeldata::lending_club[-(1:5),])
   )
   expect_true(!is.null(extract_fit_engine(glm_mars)$glm.list))
   parsnip_pred <- predict(glm_mars, new_data = lending_club[1:5, -ncol(lending_club)], type = "prob")