r - 将最大值添加到R中的模拟

Question

# Here's how I simulate my dataset:
n.days <- 1000
n.indvs <- 10000
rate.decay <- 0.01

set.seed(1)
system.time(
  sim_data <- replicate(n.days, rexp(n.indvs, rate.decay))
)

我想为数据集中的所有值添加一个最大值（最大值 = 700）。我怎样才能做到这一点？

标签： rsimulation

Answer 1

您可以使用pmin来设置数据集的上限，即

sim_data <- pmin(sim_data,700)