这是一些测试代码:
require(BatchJobs)
f = function(i) {Sys.sleep(60)}
reg <- makeRegistry(id="myreg")
batchMap(reg, f, 1:100)
submitJobs(reg, resources=list(memory=4*1024*1024, queue="normal_serial"))
每个块似乎都需要永远,几乎就像在一台机器上完成一样......
submitJobs |+ | 1% (01:39:00)
有任何想法吗?