[R-br] Criar função para tirar a média entre grupos sob condições dadas