Escolha um elemento aleatório de um vetor para cada linha de um data.table

Eu tenho um quadro de dados de nomes. E eu tenho um vetor de diferentes itens alimentares. Eu quero escolher um elemento desse vetor aleatoriamente para cada Nome, para que a tabela data.t se pareça abaixo.

x<- c("apple","pepsi","rice","coke","banana","butter","bread")

library(data.table)

dt <- fread('

Name  NextItem
John   rice
Logan  butter
Sarah  bread
Vinny  rice
')

Eu quero a amostragem com substituição. eu tentei

dt[,NextItem:= sample(x,1)]&nbsp;mas mostra o mesmo item de comida (elemento vetorial) para todos, não elementos aleatórios diferentes, como o exemplo mencionado acima.