How to clip a regression line

Question

I\'m wondering how a regression line can be clipped at a certain point. If we assume this toy data:

set.seed(123)
x <- 1:120
y <- rnorm(120)

<