通过R中的线性递减函数生成随机值

Question

我试图在2个点之间随机选择值，以便最接近左边界选择最可能的值，并在该范围内线性减小。

像这样，但是接近最小值的值比接近最大值的值更可能接近最小值

runif(1, min=11700, max=126000)

Answer 1

您可以使用测试版发行版，然后按比例放大这些价值观，以获得“lefty”＆＃39;分配

fun <- function(n) {
  11700 + (126000 - 11700) * rbeta(n, 1, 3) # a < b will tilt left 
}

hist(fun(1000))