diff --git a/vtg.preprocessing/R/assign_types.R b/vtg.preprocessing/R/assign_types.R index 873391e..ff5fb2c 100644 --- a/vtg.preprocessing/R/assign_types.R +++ b/vtg.preprocessing/R/assign_types.R @@ -17,7 +17,7 @@ assign_types <- function(data, types) { column_names <- names(types) - + vtg::log$debug("Assigning types to columns: ", column_names) # for each specified column in types set the appropiate type for (i in seq_len(length(types))) { diff --git a/vtg.summary/src/R/RPC_variance_sum.R b/vtg.summary/src/R/RPC_variance_sum.R index 1a48c90..f9f514e 100644 --- a/vtg.summary/src/R/RPC_variance_sum.R +++ b/vtg.summary/src/R/RPC_variance_sum.R @@ -29,7 +29,7 @@ RPC_variance_sum <- function(data, columns, mean, types = NULL, data <- vtg.preprocessing::factorize(data) # execute checks that are common to all RPCs - data <- vtg.summary::common_checks_rpc(data, columns, types) + data <- vtg.preprocessing::common_checks_rpc(data, columns, types) if ("error" %in% names(data)) { # Return error message return(data)