r-数据帧内具有参数的随机分布

Question

我正试图使用预先指定的变量在数据帧内生成随机损失。我感兴趣的是"；兰特；变量-生成随机数的更好/更有效的方法是什么？我使用下面的表格得到了我想要的东西，但当我用我的完整表格运行它时，对于许多模拟，我会遇到运行时问题。

data <- as.data.frame(matrix(c(1, 2500, 2500, 5000), 2, 2)) #take this as given
colnames(data) <- c("Lower", "Upper") #lower & upper bound of uniform distribution
rand.num.1 <- rdunif(1, data[1,1],  data[1,2])
rand.num.2 <- rdunif(1, data[2,1],  data[2,2])
data$rand.num <- c(rand.num.1, rand.num.2)
print(data)

任何帮助都将不胜感激！

Answer 1

使用runif和truncate:一次性执行随机采样

data$rand.num <- floor(runif(nrow(data), data$Lower, data$Upper + 1))