Cómo trazar una comparación de dos valores categóricos fijos para la regresión lineal de otra variable continua

Entonces quiero trazar esto:

lmfit = lm (y ~ a + b)

pero "b" solo tiene los valores de cero y uno. Entonces, quiero trazar dos líneas de regresión separadas, que son paralelas entre sí para mostrar la diferencia que b hace en la intersección y. Entonces, después de trazar esto:

trama (b, y)

Quiero usar luegoabline(lmfit,col="red",lwd=2) dos veces, una vez con el valor x de b establecido en cero, y una vez con él establecido en uno. Entonces, una vez sin el término incluido, y una vez donde b es solo 1b.

Para reformular: b es categórico, 0 o 1. a es continuo con una ligera tendencia lineal.

Gracias.

Ejemplo:

Respuestas a la pregunta(3)

Su respuesta a la pregunta