У меня есть этот датафрейм

<code>id <- c(1,1,1,2,2,3)
name <- c("A","A","A","B","B","C")
value <- c(7:12)
df<- data.frame(id=id, name=name, value=value)
df
</code>

Эта функция выбирает случайную строку из нее:

<code>randomRows = function(df,n){
  return(df[sample(nrow(df),n),])
}
</code>

то есть

<code>randomRows(df,1)
</code>

Но я хочу случайным образом выбрать одну строку для каждого имени. (или для каждого идентификатора) и объединить всю эту строку в новую таблицу, так что в этом случае три строки. Это должно зацикливаться на 2000+ строк данных. Пожалуйста, покажи мне, как ?!