Add a multivariate linear regression line on a ggplot using R

Question

I have created a scatter plot of the variables Y and X1 using ggplot. I would like to add the following linear regression line to the ggplot:

model <- lm(Y