diff --git a/01b_MesobromionCluster.R b/01b_MesobromionCluster.R index 79bf5979c87e2dca2166ff1c8016f55378fc4500..7fd9bed2a1b7ab29279ea1e94eb03f61aa399521 100644 --- a/01b_MesobromionCluster.R +++ b/01b_MesobromionCluster.R @@ -113,7 +113,7 @@ Mesobromion <- function(species.path, traits.path, output, myfunction="get.corXY get.corXY.bootstrap(comm=species, trait=traits, trait.sel=tt, bootstrap=nperm)) } - save(corXY.output, file = paste(output, "_.RData", sep="")) + save(corXY.output, file = paste(output,"_", chunk.i, "_.RData", sep="")) } diff --git a/cli_01b.r b/cli_01b.r index 65f8ff13f4a44bbc358478bfa0ceca1fea7a2763..b7955685bc858ac7d09a047c68610479812086ab 100644 --- a/cli_01b.r +++ b/cli_01b.r @@ -105,4 +105,4 @@ ncores <- cli$options$ncores # ------------------------------------------------------------------------------ source("01b_MesobromionCluster.R") -Mesobromion(species.path, traits.path, output, myfunction, combinations, start.round, relax.round, max.inter.t, chunk.n, chunk.i, nperm, ncores) +Mesobromion(species.path, traits.path, output, myfunction, combinations, start.round, relax.round, max.inter.t, chunkn, chunk.i, nperm, ncores)