if (require(geuvStore2)) {
require(BatchJobs)
store = makeGeuvStore2()
fd = tempfile()
tempreg = makeRegistry("tempSMR", file.dir=fd)
storeMapResults( store, tempreg, fun=function(job, res, ...) length(res) )
showStatus(tempreg)
submitJobs(tempreg, 1:2)
loadResults(tempreg)
unlink(fd)
}
Run the code above in your browser using DataLab