R编码带有约束的随机值

Question

我想知道R代码为x和y生成1000个随机值，介于1到7之间，这样x＆lt; = y和所有数字都是相同分布的。

Answer 1

使用浮点数

x <- c()
y <- c()
  for (i in 1:1000){
      x[i] <- runif(1, 1, 7)
      y[i] <- runif(1, x[i], 7)
     // print or do something you want here
    }

带整数

x <- c()
y <- c()
for (i in 1:1000){
      x[i] <- sample(1:7, 1)
      y[i] <- sample(x[i]:7, 1)
     // print or do something you want here
    }

你可以尝试一下。