rep (), каждый из которых равен вектору

У меня быстрый вопрос относительно последовательности и каждого :

vect1 <- c(4, 5, 10, 3, 1)

Я хочу реплицировать с этим вектором как каждый такой, что первое число повторяется 4, вторая 5, третья 10, четвертая 3 и пятая равна 1.

rep(1:5, each = vect1) 
 [1] 1 1 1 1 2 2 2 2 3 3 3 3 4 4 4 4 5 5 5 5
Warning message:
In rep(1:5, each = vect1) : first element used of 'each' argument

rep(1:5, each = c(4, 5, 10, 3, 1)) 

    [1] 1 1 1 1 2 2 2 2 3 3 3 3 4 4 4 4 5 5 5 5
    Warning message:
    In rep(1:5, each = c(4, 5, 10, 3, 1)) :
      first element used of 'each' argument

Я знаю, что это неправильное использование каждого из них.