Como plotar uma comparação de dois valores categóricos fixos para regressão linear de outra variável contínua

Então, eu quero traçar isso:

lmfit = lm (y ~ a + b)

mas "b" possui apenas os valores de zero e um. Então, eu quero traçar duas linhas de regressão separadas, que são paralelas umas às outras para mostrar a diferença que b faz com a interceptação em y. Então, depois de planejar isso:

plot (b, y)

Eu quero usarabline(lmfit,col="red",lwd=2) duas vezes, uma vez com o valor x de b definido como zero e uma vez com ele definido como um. Então, uma vez sem o termo incluído e uma vez em que b é apenas 1b.

Para reafirmar: b é categórico, 0 ou 1. a é contínuo com uma leve tendência linear.

Obrigado.

Exemplo:

questionAnswers(3)

yourAnswerToTheQuestion