假设我有一个'频率'矢量,比如
freq <- rpois(N, lambda)
对于每个N
模拟运行,我想创建一个长度为freq[i]
且随均匀(0,1)分布的随机向量。
我天真地尝试runif(freq, 0, 1)
,但R将其视为runif(length(freq),0,1)
为了最大限度地提高性能,我希望尽可能地对代码进行矢量化。怎么办?
答案 0 :(得分:2)
lapply()
将为每个频率执行任务。
freq <- rpois(N, lambda)
lapply(freq, runif)