http://saravaculturalptrj.blog/como-extrair-coeficientes-de-regressao-da-funcao-lm-no-r