funcao.final.r