Заменить случайным числом между диапазоном

Question

Проблема : Как в VAR заменить каждое значение 1 случайным числом от 1,1 до 7,1 и каждое значение 2 случайным числом от 7,2 до 10,1?

i = seq(1,2,by = 1)

j = c(0.30,0.70)

VAR = sample(i, size = 100, replace = TRUE, prob = j)

Answer 1

Мы можем использовать runif для генерации случайных чисел от минимального до максимального значения.

VAR[VAR == 1] <- runif(sum(VAR == 1), 1.1, 7.1)
VAR[VAR == 2] <- runif(sum(VAR == 2), 7.2, 10.1)