限制 rnorm 的数据量超过一定数量

Limit the amount of data from rnorm with over a certain number

我希望只有 20 个数据集大于或等于 60,另外 20 个数据集小于 60。 谁能帮帮我?

X_old_q <- rnorm(40, mean = 64.03125, sd = 10)

这是我想到的第一个主意。我相信有一种更好的方法可以解决您的问题,但是这个可以解决您的问题:

lowerSample = c()
while(length(lowerSample) < 20) {
  value = rnorm(1, mean = 64.03125, sd = 10)
  if(value < 60) {
    lowerSample = c(lowerSample, value)
  }
}

upperSample = c()
while(length(upperSample) < 20) {
  value = rnorm(1, mean = 64.03125, sd = 10)
  if(value >= 60) {
    upperSample = c(upperSample, value)
  }
}

X_old_q = c(lowerSample, upperSample)