Ich habe einen Datenrahmen mit Namen. Und ich habe einen Vektor von verschiedenen Lebensmitteln. Ich möchte für jeden Namen zufällig ein Element aus diesem Vektor auswählen, damit die data.table wie folgt aussieht.

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

library(data.table)

dt <- fread('

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

Ich möchte die Probenahme mit Ersatz. Ich habe versuch

dt[,NextItem:= sample(x,1)] aber es wird für alle das gleiche Lebensmittelelement (Vektorelement) abgetastet, nicht verschiedene zufällige Elemente wie im obigen Beispiel.