Extract сюжетная линия формула как вектор

Question

Я получил data.frame так:

V1 V2 -251 1426 -250 1466 -249 1546 -248 1482 -247 1509 -246 1475 Я построил линейную модель, как:

fit=lm(x1$V2~x1$V1) 

Тогда я построить эту линию

lines(x1$V1,fitted(fit),col="red") 

Итак, вопрос следующий: Есть ли способ извлечь построенную линию как data.frame или как формулу f (x) = ax + b? Заранее спасибо! PS Просто любопытно.

Answer 1

Вы можете использовать

data.frame(x=x1$V1,y=fitted(fit)) 

Если вы хотите, чтобы получить формулу, вы можете использовать

b=lm$coefficients[1] 
a=lm$coefficients[2] 
cat("y=",b,"+x*",a)