projects.mako.cc - redirect-tools/blob - example/02-generate_spells_cluster.R

   1 # save the run number
   2 run <- as.numeric(commandArgs(TRUE)) + 1
   3 run.string <- sprintf("%03d", run)
   4
   5 setwd(redirect.dat.dir)
   6 redirect.spells <- filename.to.spells(list.files()[run])
   7
   8 setwd(spells.data.dir)
   9 save(redirect.spells, file=paste("redirect_spells-", run.string, ".RData", sep=""))
  10