inst/demos/gsm/generateSegmentedBashScript.R

max <- 22330
starts <- seq(1, max, 20)
ends <- starts + 19
ends[length(ends)] <- max
bashScript <- file("runByChunks.sh")
lines <- sprintf("Rscript runMany.R %d %d", starts, ends)
writeLines(lines, bashScript)
close(bashScript)
PriceLab/TrenaProjectLymphocyte documentation built on Sept. 2, 2019, 8 a.m.