unify decorators and transformators default values

Author: m7pr

R/tm_a_pca.R

@@ -134,7 +134,7 @@ tm_a_pca <- function(label = "Principal Component Analysis",
                      pre_output = NULL,
                      post_output = NULL,
                      transformators = list(),
-                     decorators = NULL) {
+                     decorators = list()) {
   message("Initializing tm_a_pca")
 
   # Normalize the parameters

R/tm_a_regression.R

@@ -158,7 +158,7 @@ tm_a_regression <- function(label = "Regression Analysis",
                             default_outlier_label = "USUBJID",
                             label_segment_threshold = c(0.5, 0, 10),
                             transformators = list(),
-                            decorators = NULL) {
+                            decorators = list()) {
   message("Initializing tm_a_regression")
 
   # Normalize the parameters

R/tm_g_association.R

@@ -139,7 +139,7 @@ tm_g_association <- function(label = "Association",
                              post_output = NULL,
                              ggplot2_args = teal.widgets::ggplot2_args(),
                              transformators = list(),
-                             decorators = NULL) {
+                             decorators = list()) {
   message("Initializing tm_g_association")
 
   # Normalize the parameters

R/tm_g_bivariate.R

@@ -196,7 +196,7 @@ tm_g_bivariate <- function(label = "Bivariate Plots",
                            pre_output = NULL,
                            post_output = NULL,
                            transformators = list(),
-                           decorators = NULL) {
+                           decorators = list()) {
   message("Initializing tm_g_bivariate")
 
   # Normalize the parameters

R/tm_g_distribution.R

@@ -151,7 +151,7 @@ tm_g_distribution <- function(label = "Distribution Module",
                               pre_output = NULL,
                               post_output = NULL,
                               transformators = list(),
-                              decorators = NULL) {
+                              decorators = list()) {
   message("Initializing tm_g_distribution")
 
   # Normalize the parameters

R/tm_g_response.R

@@ -157,7 +157,7 @@ tm_g_response <- function(label = "Response Plot",
                           pre_output = NULL,
                           post_output = NULL,
                           transformators = list(),
-                          decorators = NULL) {
+                          decorators = list()) {
   message("Initializing tm_g_response")
 
   # Normalize the parameters

R/tm_g_scatterplot.R

@@ -240,7 +240,7 @@ tm_g_scatterplot <- function(label = "Scatterplot",
                              table_dec = 4,
                              ggplot2_args = teal.widgets::ggplot2_args(),
                              transformators = list(),
-                             decorators = NULL) {
+                             decorators = list()) {
   message("Initializing tm_g_scatterplot")
 
   # Normalize the parameters

R/tm_g_scatterplotmatrix.R

@@ -178,7 +178,7 @@ tm_g_scatterplotmatrix <- function(label = "Scatterplot Matrix",
                                    pre_output = NULL,
                                    post_output = NULL,
                                    transformators = list(),
-                                   decorators = NULL) {
+                                   decorators = list()) {
   message("Initializing tm_g_scatterplotmatrix")
 
   # Normalize the parameters

R/tm_missing_data.R

@@ -118,7 +118,7 @@ tm_missing_data <- function(label = "Missing data",
                             pre_output = NULL,
                             post_output = NULL,
                             transformators = list(),
-                            decorators = NULL) {
+                            decorators = list()) {
   message("Initializing tm_missing_data")
 
   # Normalize the parameters

R/tm_outliers.R

@@ -158,7 +158,7 @@ tm_outliers <- function(label = "Outliers Module",
                         pre_output = NULL,
                         post_output = NULL,
                         transformators = list(),
-                        decorators = NULL) {
+                        decorators = list()) {
   message("Initializing tm_outliers")
 
   # Normalize the parameters