Объединить вектор и data.frame, сопоставляя значения столбцов и значения вектора

У меня есть

vetor <- c(1,2,3)
data <- data.frame(id=c('a', 'b', 'a', 'c', 'a'))

Мне нужен вывод data.frame, который сопоставляет каждое значение вектора с определенным идентификатором, в результате:

  id vector1
1  a       1
2  b       2
3  a       1
4  c       3
5  a       1