species.path <- "_data/Mesobromion/species.v2.10perc.cov.txt"
traits.path  <- "_data/Mesobromion/traits.v2.10perc.txt"
output  <- "_derived/Mesobromion/Cover/HIDDENtest"
myfunction <- "get.corXY.bootstrap"
max.inter.t <- 1
chunk.i <- 46
nperm <- 5
ncores <- 1
chunkn <- 53
combinations <- "all"
start.round <- 1
relax.round <- 1
exclude.na <- F

source("01b_MesobromionCluster.R")
Mesobromion(species.path, traits.path, output, myfunction, 
            combinations, start.round, relax.round, max.inter.t, 
            chunkn, chunk.i, nperm, ncores, exclude.na)