Updated calcula_regressao.R