Merge branch '1187_decorate_output@main' into tm_bivariate@1187_decorate_output@main

Author: m7pr

R/tm_a_regression.R

@@ -607,7 +607,6 @@ srv_a_regression <- function(id,
     })
 
     output_plot_0 <- reactive({
-
       fit <- fit_r()[["fit"]]
       ANL <- anl_merged_q()[["ANL"]]
 

R/tm_outliers.R

@@ -984,7 +984,7 @@ srv_outliers <- function(id, data, reporter, filter_panel_api, outlier_var,
 
     decorated_boxplot_q <- srv_teal_transform_data("boxplot_decorator", data = boxplot_q, transformators = decorators$boxplot)
     decorated_violin_q <- srv_teal_transform_data("violin_decorator", data = boxplot_q, transformators = decorators$violin)
-    decorated_density_plot_q <-srv_teal_transform_data("density_decorator", data = density_plot_q, transformators = decorators$density)
+    decorated_density_plot_q <- srv_teal_transform_data("density_decorator", data = density_plot_q, transformators = decorators$density)
     decorated_cumulative_plot_q <- srv_teal_transform_data("cum_dist_decorator", data = cumulative_plot_q, transformators = decorators$cum_dist)
 
     final_q <- reactive({