updated calcula_regressao.R