fix: remove rlang usage

insightsengineering · Dec 17, 2024 · 1db24ad · 1db24ad
1 parent 8a9edd2
commit 1db24ad
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/R/tm_a_mmrm.R b/R/tm_a_mmrm.R
@@ -1468,8 +1468,8 @@ srv_mmrm <- function(id,
     })
 
     decorated_tables_q <- lapply(
-      rlang::set_names(
-        c("lsmeans_table", "diagnostic_table", "fixed_effects_table", "covariance_table")
+      stats::setNames(
+        nm = c("lsmeans_table", "diagnostic_table", "fixed_effects_table", "covariance_table")
       ),
       function(output_function) {
         srv_decorate_teal_data(
@@ -1485,7 +1485,7 @@ srv_mmrm <- function(id,
     decorated_objs_q <- c(
       decorated_tables_q,
       lapply(
-        rlang::set_names(c("lsmeans_plot", "diagnostic_plot")),
+        setNames(nm = c("lsmeans_plot", "diagnostic_plot")),
         function(output_function) {
           srv_decorate_teal_data(
             id = sprintf("d_%s", output_function),