[R-br] Função usando sample