有没有办法访问当前的复制数replicate
函数,这样我就可以将它用作重复评估中的变量?例如,在这个简单的示例中,我想使用当前复制数来生成当前复制数的可变长度向量列表。例如,x
下面代表当前的复制:
replicate( 3 , rep( x , sample.int(5,1) ) )
我知道这个简单的例子很容易做到lapply
lapply( 1:3 , function(x) rep( x , sample.int(5,1) ) )
但是你可以访问复制计数器吗replicate
?
不,至少不是以受支持的、用户友好的方式。正如阿伦所说:
> replicate
function (n, expr, simplify = "array")
sapply(integer(n), eval.parent(substitute(function(...) expr)),
simplify = simplify)
...
> sapply
function (X, FUN, ..., simplify = TRUE, USE.NAMES = TRUE)
{
FUN <- match.fun(FUN)
answer <- lapply(X = X, FUN = FUN, ...)
...
现在这就是sapply
看看你是否通过3
:
> integer(3)
[1] 0 0 0
你为什么不写你自己的版本replicate
用作快捷方式?
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)