Extraer coeficientes de LM en R

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