Merge pull request #282 from cmu-delphi/loadallFix

fix: load_all patch, and Roxygen update

Author: dsweber2

.Rprofile

@@ -71,4 +71,4 @@ Config/testthat/edition: 3
 Encoding: UTF-8
 LazyData: true
 Roxygen: list(markdown = TRUE)
-RoxygenNote: 7.2.3
+RoxygenNote: 7.3.0

DESCRIPTION

@@ -203,9 +203,9 @@ importFrom(quantreg,rq)
 importFrom(recipes,bake)
 importFrom(recipes,prep)
 importFrom(rlang,"!!")
+importFrom(rlang,"%@%")
+importFrom(rlang,"%||%")
 importFrom(rlang,":=")
-importFrom(rlang,`%@%`)
-importFrom(rlang,`%||%`)
 importFrom(rlang,abort)
 importFrom(rlang,caller_env)
 importFrom(rlang,is_empty)

NAMESPACE

@@ -6,7 +6,7 @@
 #'
 #' @inheritParams usethis::use_test
 #'
-#' @importFrom rlang `%||%`
+#' @importFrom rlang %||%
 #' @export
 #'
 #' @examples

R/create-layer.R

@@ -40,7 +40,7 @@
 #'   step_epi_lag(death_rate, lag = c(0, 7, 14)) %>%
 #'   step_epi_lag(case_rate, lag = c(0, 7, 14))
 #' get_test_data(recipe = rec, x = case_death_rate_subset)
-#' @importFrom rlang `%@%`
+#' @importFrom rlang %@%
 #' @export
 
 get_test_data <- function(

R/get_test_data.R

@@ -49,7 +49,10 @@ quantile_reg <- function(mode = "regression", engine = "rq", quantile_levels = 0
 }
 
 make_quantile_reg <- function() {
-  parsnip::set_new_model("quantile_reg")
+  model_env <- get_model_env()
+  if (!("quantile_reg" %in% model_env$models)) {
+    parsnip::set_new_model("quantile_reg")
+  }
   parsnip::set_model_mode("quantile_reg", "regression")
 
 

R/make_quantile_reg.R

@@ -111,7 +111,10 @@ smooth_quantile_reg <- function(
 
 
 make_smooth_quantile_reg <- function() {
-  parsnip::set_new_model("smooth_quantile_reg")
+  model_env <- get_model_env()
+  if (!("smooth_quantile_reg" %in% model_env$models)) {
+    parsnip::set_new_model("smooth_quantile_reg")
+  }
   parsnip::set_model_mode("smooth_quantile_reg", "regression")
   parsnip::set_model_engine("smooth_quantile_reg", "regression", eng = "smoothqr")
   parsnip::set_dependency(