我有这个数据帧
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
Run Code Online (Sandbox Code Playgroud)
此函数从中选择一个随机行:
randomRows = function(df,n){
return(df[sample(nrow(df),n),])
}
Run Code Online (Sandbox Code Playgroud)
即
randomRows(df,1)
Run Code Online (Sandbox Code Playgroud)
但我想随机选择每个'name'一行(或每个'id'是相同的)并将整行连接成一个新表,所以在这种情况下,三行.这必须遍历2000多行数据帧.请告诉我怎么样?!
r ×1