[R-br] Retirar uma amostra de um data.frame levando toda informação

[Elias Teixeira Krainski]

s <- split(dados, dados$GRUPO)
s$"5" <- s$"5"[sample(1:nrow(s$"5"), 6),]
do.call('rbind', s)