Extraer coeficientes de LM en R
summary(lm)$coefficients[1,2]
Successful Salmon
summary(lm)$coefficients[1,2]