with parameter a, draw the graphs for the parameters a = 0, 1, ..., 4.
> plot({seq(abs(2*a - x), a=0..4)}, x=-10..10);