kmerclust_merge.R

library(kmerclust)

args <- commandArgs(trailingOnly = TRUE)
print(args)
res_files <- list.files(pattern = "Rdata$")
res_total <- NULL
for (res_file in res_files) {
  load(res_file)
  res_total <- rbind(res_total, res)
}
res <- res_total
save(res, file = paste0(args[1], "_boot", ".Rdata"))