Update funcoes.R