species.path <- "_data/Mesobromion/species.out.10perc.txt"
traits.path  <- "_data/Mesobromion/traits.out.10perc.txt"
output  <- "test99"
myfunction <- "get.corXY.bootstrap"
max.inter.t <- 3
chunk.i <- NA
nperm <- 20
ncores <- 1
chunkn <- 3*ncores
combinations <- "sequential"
start.round <- 4

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