[skip style] [skip vbump] Restyle files

insightsengineering · Nov 18, 2024 · 81a25da · 81a25da
1 parent 3ea63ec
commit 81a25da
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/R/analyze_variables.R b/R/analyze_variables.R
@@ -239,8 +239,10 @@ s_summary.numeric <- function(x,
   y$geom_cv <- c("geom_cv" = sqrt(exp(stats::sd(log(x_no_negative_vals), na.rm = FALSE) ^ 2) - 1) * 100) # styler: off
 
   geom_mean_ci_3d <- c(y$geom_mean, y$geom_mean_ci)
-  y$geom_mean_ci_3d <- formatters::with_label(geom_mean_ci_3d,
-                                              paste0("Geometric Mean (", f_conf_level(control$conf_level), ")"))
+  y$geom_mean_ci_3d <- formatters::with_label(
+    geom_mean_ci_3d,
+    paste0("Geometric Mean (", f_conf_level(control$conf_level), ")")
+  )
 
   y
 }