Создание перемешанных чисел в R

Question

В результате просмотра ЭТОГО ПРИМЕРА мне стало интересно, как я могу создать один набор из 15 перемешанных порядков от 1 до 4 в R

На ЭТОМ веб-сайте , вы можете получить 1 набор из 15 перемешанных номеров Начиная от 1 до 4

В качестве примера, на своем беге я получил:

Set # 1: 3, 2, 2, 1, 1, 1, 3, 2, 2, 3, 2, 1, 3, 4, 1

Есть ли способ, которым я могу повторить вышеизложенное в R?

Answer 1

Если я правильно понял ваш вопрос, сначала приходит на ум решение, подобное следующему: очень простое, но оно выполняет свою работу.

size <- 40
vec <- sample(1:4, size = size, replace = TRUE)
while(length(unique(vec)) < 4){
    vec <- sample(1:4, size = size, replace = TRUE)
}
vec 

Цикл while не будет продолжаться долго, поскольку очень маловероятно, что цифра не появится в случайном векторе vec, если вы производите выборку 40 раз.

Конечно, вы можете изменить size вашего вектора, код все равно будет работать, за исключением того, что вы хотите, чтобы vec было <4; в этом случае цикл будет продолжаться бесконечно. </p>