прогнозировать y данную модель в R

model <- lm(y ~ x1, data = df)
df2 <- data.frame(x1 = 30)
predict(model, df2)
Successful Salmon