Merge pull request #81 from tidymodels/RC-0.3.0

Release Candidate 0.3.0
tidymodels · Dec 22, 2024 · 4871989 · 4871989
2 parents 50d9194 + 4095b41
commit 4871989
Show file tree

Hide file tree

Showing 44 changed files with 68 additions and 13 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: orbital
 Title: Predict with 'tidymodels' Workflows in Databases
-Version: 0.2.0.9000
+Version: 0.3.0.9000
 Authors@R: c(
     person("Emil", "Hvitfeldt", , "[email protected]", role = c("aut", "cre")),
     person("Posit Software, PBC", role = c("cph", "fnd"))

diff --git a/NEWS.md b/NEWS.md
@@ -1,17 +1,19 @@
 # orbital (development version)
 
-* `augment()` method for orbital object have been added. (#55)
-
-* `orbital()` gained `prefix` argument to allow for renaming of prediction columns. (#59)
-
-* `orbital()` now works with `logistic_reg()` models for class prediction and probability predictions. (#62, #66)
+# orbital 0.3.0
 
 * `orbital()` has gained `type` argument to change prediction type. (#66)
 
+* `orbital()` now works with `logistic_reg(engine = "glm")` models for class prediction and probability predictions. (#62, #66)
+
 * `orbital()` now works with `boost_tree(engine = "xgboost")` models for class prediction and probability predictions. (#71)
 
 * `orbital()` now works with `decision_tree(engine = "partykit")` models for class prediction and probability predictions. (#77)
 
+* `augment()` method for `orbital()` object have been added. (#55)
+
+* `orbital()` gained `prefix` argument to allow for renaming of prediction columns. (#59)
+
 # orbital 0.2.0
 
 * Support for `step_dummy()`,  `step_impute_mean()`, `step_impute_median()`, `step_impute_mode()`,  `step_unknown()`, `step_novel()`, `step_other()`, `step_BoxCox()`, `step_inverse()`, `step_mutate()`, `step_sqrt()`, `step_indicate_na()`, `step_range()`, `step_intercept()`, `step_ratio()`, `step_lag()`, `step_log()`, `step_rename()` has been added. (#17)

diff --git a/README.md b/README.md
@@ -124,7 +124,7 @@ db_mtcars <- copy_to(con, mtcars)
 
 predict(orbital_obj, db_mtcars)
 #> # Source:   SQL [?? x 1]
-#> # Database: sqlite 3.46.0 []
+#> # Database: sqlite 3.47.0 []
 #>    .pred
 #>    <dbl>
 #>  1  22.6

diff --git a/tests/testthat/test-augment.R b/tests/testthat/test-augment.R
@@ -38,6 +38,7 @@ test_that("SQLite - augment() works", {
 	skip_if_not_installed("workflows")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-model-partykit.R b/tests/testthat/test-model-partykit.R
@@ -1,8 +1,8 @@
 test_that("decision_tree(partykit) works with type = class", {
 	skip_if_not_installed("parsnip")
 	skip_if_not_installed("tidypredict")
-  skip_if_not_installed("bonsai")
-  library(bonsai)
+	skip_if_not_installed("bonsai")
+	library(bonsai)
 
 	mtcars$vs <- factor(mtcars$vs)
 
@@ -27,8 +27,8 @@ test_that("decision_tree(partykit) works with type = class", {
 test_that("decision_tree(partykit) works with type = prob", {
 	skip_if_not_installed("parsnip")
 	skip_if_not_installed("tidypredict")
-  skip_if_not_installed("bonsai")
-  library(bonsai)
+	skip_if_not_installed("bonsai")
+	library(bonsai)
 
 	mtcars$vs <- factor(mtcars$vs)
 
@@ -59,8 +59,8 @@ test_that("decision_tree(partykit) works with type = prob", {
 test_that("decision_tree(partykit) works with type = c(class, prob)", {
 	skip_if_not_installed("parsnip")
 	skip_if_not_installed("tidypredict")
-  skip_if_not_installed("bonsai")
-  library(bonsai)
+	skip_if_not_installed("bonsai")
+	library(bonsai)
 
 	mtcars$vs <- factor(mtcars$vs)
 

diff --git a/tests/testthat/test-step_adasyn.R b/tests/testthat/test-step_adasyn.R
@@ -80,6 +80,7 @@ test_that("SQLite - step_adasyn works", {
 	skip_if_not_installed("themis")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_adasyn <- dplyr::as_tibble(mtcars)
 	mtcars_adasyn$vs <- as.factor(mtcars$vs)
@@ -107,6 +108,7 @@ test_that("duckdb - step_adasyn works", {
 	skip_if_not_installed("themis")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_adasyn <- dplyr::as_tibble(mtcars)
 	mtcars_adasyn$vs <- as.factor(mtcars$vs)

diff --git a/tests/testthat/test-step_bin2factor.R b/tests/testthat/test-step_bin2factor.R
@@ -76,6 +76,7 @@ test_that("SQLite - step_bin2factor works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_boxcox.R b/tests/testthat/test-step_boxcox.R
@@ -74,6 +74,7 @@ test_that("SQLite - step_BoxCox works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_bsmote.R b/tests/testthat/test-step_bsmote.R
@@ -80,6 +80,7 @@ test_that("SQLite - step_bsmote works", {
 	skip_if_not_installed("themis")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_bsmote <- dplyr::as_tibble(mtcars)
 	mtcars_bsmote$vs <- as.factor(mtcars$vs)

diff --git a/tests/testthat/test-step_center.R b/tests/testthat/test-step_center.R
@@ -74,6 +74,7 @@ test_that("SQLite - step_center works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_discretize.R b/tests/testthat/test-step_discretize.R
@@ -125,6 +125,7 @@ test_that("SQLite - step_discretize works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_discretize <- dplyr::as_tibble(mtcars)
 	mtcars_discretize[1, ] <- NA

diff --git a/tests/testthat/test-step_downsample.R b/tests/testthat/test-step_downsample.R
@@ -80,6 +80,7 @@ test_that("SQLite - step_downsample works", {
 	skip_if_not_installed("themis")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_downsample <- dplyr::as_tibble(mtcars)
 	mtcars_downsample$vs <- as.factor(mtcars$vs)

diff --git a/tests/testthat/test-step_dummy.R b/tests/testthat/test-step_dummy.R
@@ -105,6 +105,7 @@ test_that("SQLite - step_dummy works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars1 <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_impute_mean.R b/tests/testthat/test-step_impute_mean.R
@@ -77,6 +77,7 @@ test_that("SQLite - step_impute_mean works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_impute_mean <- dplyr::as_tibble(mtcars)
 	mtcars_impute_mean[2:4, ] <- NA

diff --git a/tests/testthat/test-step_impute_median.R b/tests/testthat/test-step_impute_median.R
@@ -78,6 +78,7 @@ test_that("SQLite - step_impute_median works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_impute_median <- dplyr::as_tibble(mtcars)
 	mtcars_impute_median[2:4, ] <- NA

diff --git a/tests/testthat/test-step_impute_mode.R b/tests/testthat/test-step_impute_mode.R
@@ -86,6 +86,7 @@ test_that("SQLite - step_impute_mode works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_impute_mode <- dplyr::as_tibble(mtcars)
 	mtcars_impute_mode$gear <- letters[mtcars$gear]

diff --git a/tests/testthat/test-step_indicate_na.R b/tests/testthat/test-step_indicate_na.R
@@ -80,6 +80,7 @@ test_that("SQLite - step_indicate_na works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_indicate_na <- dplyr::as_tibble(mtcars)
 	mtcars_indicate_na[2:4, ] <- NA

diff --git a/tests/testthat/test-step_intercept.R b/tests/testthat/test-step_intercept.R
@@ -64,6 +64,7 @@ test_that("SQLite - step_intercept works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_inverse.R b/tests/testthat/test-step_inverse.R
@@ -91,6 +91,7 @@ test_that("SQLite - step_inverse works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_lag.R b/tests/testthat/test-step_lag.R
@@ -60,6 +60,7 @@ test_that("SQLite - step_lag works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_lencode_bayes.R b/tests/testthat/test-step_lencode_bayes.R
@@ -98,6 +98,7 @@ test_that("SQLite - step_lencode_bayes works", {
 	skip_if_not_installed("rstanarm")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_lencode_bayes <- dplyr::as_tibble(mtcars)
 	mtcars_lencode_bayes$gear <- as.factor(mtcars_lencode_bayes$gear)

diff --git a/tests/testthat/test-step_lencode_glm.R b/tests/testthat/test-step_lencode_glm.R
@@ -93,6 +93,7 @@ test_that("SQLite - step_lencode_glm works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_lencode_glm <- dplyr::as_tibble(mtcars)
 	mtcars_lencode_glm$gear <- as.factor(mtcars_lencode_glm$gear)

diff --git a/tests/testthat/test-step_lencode_mixed.R b/tests/testthat/test-step_lencode_mixed.R
@@ -1,6 +1,7 @@
 test_that("step_lencode_mixed works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("embed")
+	skip_if_not_installed("lme4")
 
 	mtcars <- dplyr::as_tibble(mtcars)
 	mtcars$gear <- as.factor(mtcars$gear)
@@ -23,6 +24,7 @@ test_that("step_lencode_mixed works", {
 test_that("step_lencode_mixed only calculates what is sufficient", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("embed")
+	skip_if_not_installed("lme4")
 
 	mtcars <- dplyr::as_tibble(mtcars)
 	mtcars$gear <- as.factor(mtcars$gear)
@@ -44,6 +46,7 @@ test_that("step_lencode_mixed only calculates what is sufficient", {
 test_that("step_lencode_mixed works with empty selections", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("embed")
+	skip_if_not_installed("lme4")
 
 	mtcars <- dplyr::as_tibble(mtcars)
 	mtcars$gear <- as.factor(mtcars$gear)
@@ -65,7 +68,10 @@ test_that("step_lencode_mixed works with empty selections", {
 
 test_that("spark - step_lencode_mixed works", {
 	skip_if_not_installed("recipes")
+	skip_if_not_installed("embed")
+	skip_if_not_installed("lme4")
 	skip_if_not_installed("sparklyr")
+
 	skip_if(is.na(testthat_spark_env_version()))
 
 	mtcars_lencode_mixed <- dplyr::as_tibble(mtcars)
@@ -91,8 +97,11 @@ test_that("spark - step_lencode_mixed works", {
 
 test_that("SQLite - step_lencode_mixed works", {
 	skip_if_not_installed("recipes")
+	skip_if_not_installed("embed")
+	skip_if_not_installed("lme4")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_lencode_mixed <- dplyr::as_tibble(mtcars)
 	mtcars_lencode_mixed$gear <- as.factor(mtcars_lencode_mixed$gear)
@@ -119,6 +128,8 @@ test_that("SQLite - step_lencode_mixed works", {
 
 test_that("duckdb - step_lencode_mixed works", {
 	skip_if_not_installed("recipes")
+	skip_if_not_installed("embed")
+	skip_if_not_installed("lme4")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("duckdb")
 
@@ -147,6 +158,8 @@ test_that("duckdb - step_lencode_mixed works", {
 
 test_that("arrow - step_lencode_mixed works", {
 	skip_if_not_installed("recipes")
+	skip_if_not_installed("embed")
+	skip_if_not_installed("lme4")
 	skip_if_not_installed("arrow")
 
 	mtcars_lencode_mixed <- dplyr::as_tibble(mtcars)

diff --git a/tests/testthat/test-step_log.R b/tests/testthat/test-step_log.R
@@ -91,6 +91,7 @@ test_that("SQLite - step_log works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_mutate.R b/tests/testthat/test-step_mutate.R
@@ -74,6 +74,7 @@ test_that("SQLite - step_mutate works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_nearmiss.R b/tests/testthat/test-step_nearmiss.R
@@ -80,6 +80,7 @@ test_that("SQLite - step_nearmiss works", {
 	skip_if_not_installed("themis")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_nearmiss <- dplyr::as_tibble(mtcars)
 	mtcars_nearmiss$vs <- as.factor(mtcars$vs)

diff --git a/tests/testthat/test-step_normalize.R b/tests/testthat/test-step_normalize.R
@@ -74,6 +74,7 @@ test_that("SQLite - step_normalize works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_novel.R b/tests/testthat/test-step_novel.R
@@ -96,6 +96,7 @@ test_that("SQLite - step_novel works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_novel <- dplyr::as_tibble(mtcars)
 	mtcars_novel$gear <- letters[mtcars$gear]

diff --git a/tests/testthat/test-step_other.R b/tests/testthat/test-step_other.R
@@ -98,6 +98,7 @@ test_that("SQLite - step_other works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars_other <- dplyr::as_tibble(mtcars)
 	mtcars_other$gear <- letters[mtcars$gear]

diff --git a/tests/testthat/test-step_pca.R b/tests/testthat/test-step_pca.R
@@ -95,6 +95,7 @@ test_that("SQLite - step_pca works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars0 <- dplyr::as_tibble(mtcars)
 	mtcars0$hp <- NULL

diff --git a/tests/testthat/test-step_pca_sparse.R b/tests/testthat/test-step_pca_sparse.R
@@ -110,6 +110,7 @@ test_that("SQLite - step_pca_sparse works", {
 	skip_if_not_installed("embed")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars0 <- dplyr::as_tibble(mtcars)
 	mtcars0$hp <- NULL

diff --git a/tests/testthat/test-step_pca_sparse_bayes.R b/tests/testthat/test-step_pca_sparse_bayes.R
@@ -115,6 +115,7 @@ test_that("SQLite - step_pca_sparse_bayes works", {
 	skip_if_not_installed("VBsparsePCA")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars0 <- dplyr::as_tibble(mtcars)
 	mtcars0$hp <- NULL

diff --git a/tests/testthat/test-step_pca_truncated.R b/tests/testthat/test-step_pca_truncated.R
@@ -108,6 +108,7 @@ test_that("SQLite - step_pca_truncated works", {
 	skip_if_not_installed("embed")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars0 <- dplyr::as_tibble(mtcars)
 	mtcars0$hp <- NULL

diff --git a/tests/testthat/test-step_range.R b/tests/testthat/test-step_range.R
@@ -91,6 +91,7 @@ test_that("SQLite - step_range works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_ratio.R b/tests/testthat/test-step_ratio.R
@@ -85,6 +85,7 @@ test_that("SQLite - step_ratio works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)
 

diff --git a/tests/testthat/test-step_rename.R b/tests/testthat/test-step_rename.R
@@ -74,6 +74,7 @@ test_that("SQLite - step_rename works", {
 	skip_if_not_installed("recipes")
 	skip_if_not_installed("DBI")
 	skip_if_not_installed("RSQLite")
+	skip_on_cran()
 
 	mtcars <- dplyr::as_tibble(mtcars)