|
@@ -14,7 +14,7 @@ options(warn = 2)
|
|
|
# Set the memory limit to 30GB (30 * 1024 * 1024 * 1024 bytes)
|
|
# Set the memory limit to 30GB (30 * 1024 * 1024 * 1024 bytes)
|
|
|
soft_limit <- 30 * 1024 * 1024 * 1024
|
|
soft_limit <- 30 * 1024 * 1024 * 1024
|
|
|
hard_limit <- 30 * 1024 * 1024 * 1024
|
|
hard_limit <- 30 * 1024 * 1024 * 1024
|
|
|
-rlimit_as(soft_limit, hard_limit)
|
|
|
|
|
|
|
+invisible(rlimit_as(soft_limit, hard_limit))
|
|
|
|
|
|
|
|
# Constants for configuration
|
|
# Constants for configuration
|
|
|
plot_width <- 14
|
|
plot_width <- 14
|
|
@@ -1339,8 +1339,8 @@ main <- function() {
|
|
|
|
|
|
|
|
message("Generating rank plots")
|
|
message("Generating rank plots")
|
|
|
zscores_interactions_joined_filtered <- filter_data(
|
|
zscores_interactions_joined_filtered <- filter_data(
|
|
|
- zscores_interactions_joined,
|
|
|
|
|
- variables,
|
|
|
|
|
|
|
+ df = zscores_interactions_joined,
|
|
|
|
|
+ variables = interaction_vars,
|
|
|
missing = TRUE,
|
|
missing = TRUE,
|
|
|
adjust = TRUE,
|
|
adjust = TRUE,
|
|
|
rank = TRUE)
|
|
rank = TRUE)
|
