2011-05-21から1日間の記事一覧
本当はSys.sleepを使いたいのだがforkの中で使うと動かない。 # install.packages("fork") require("fork") sleep <- function(t) { Map(sqrt, 1:(100000 * t)) } Map(wait, Map(function(x) { fork(function() { sleep(x) cat(x) }) }, c(9,3,7,1,2,6,4,5,8…
本当はSys.sleepを使いたいのだがforkの中で使うと動かない。 # install.packages("fork") require("fork") sleep <- function(t) { Map(sqrt, 1:(100000 * t)) } Map(wait, Map(function(x) { fork(function() { sleep(x) cat(x) }) }, c(9,3,7,1,2,6,4,5,8…