我想使用runif为数据表中的每一行生成一个随机数。不幸的是,我的每一行都有相同的数字。
require(data.table)
dx <- data.table( min=1:10, max=seq(10,100,10))
dx[, sum:=min+max]
dx[, runif:=runif(n=1,min,max)]
> dx
min max sum runif
1: 1 10 11 5.086488
2: 2 20 22 5.086488
3: 3 30 33 5.086488
4: 4 40 44 5.086488
5: 5 50 55 5.086488
6: 6 60 66 5.086488
7: 7 70 77 5.086488
8: 8 80 88 5.086488
9: 9 90 99 5.086488
10: 10 100 110 5.086488
为什么runif的表现如此,但加法效果很好? 有人可以建议如何使用每行的最小值和最大值来为该行生成均匀分布的随机数吗?
答案 0 :(得分:11)
我想只是
dx[, runif := runif(.N, min, max)]
应该这样做。通过设置n=1
,您要求生成单个值,然后将其再循环到适当的长度。 min
和max
仍然以适当的矢量化方式处理。