繰り返し実行。

第1引数は、回数。
10を5回。

> replicate(5, 10)
[1] 10 10 10 10 10

> replicate
function (n, expr, simplify = "array") 
sapply(integer(n), eval.parent(substitute(function(...) expr)), 
    simplify = simplify)