使用rnorm生成随机数

Question

我正在尝试生成一个正态分布的随机数，它在正态分布时不超过某个值。我提出了以下内容：

expenses <- pmax(850, rnorm(1000, income*0.4, income*0.1))

我将如何添加到此以使其不超过1500？

Answer 1

expenses <- pmin(1500, pmax(850, rnorm(1000, income*0.4, income*0.1)))