Коэффициенты извлечения из LM в R
summary(lm)$coefficients[1,2]
Successful Salmon
summary(lm)$coefficients[1,2]