executar a regressão para certos grupos em r

lm(y ~ x, data = df, subset = (x_2 == 3))
Successful Salmon