Extrair coeficientes de LM em R

summary(lm)$coefficients[1,2]
Successful Salmon