plot [max(0,min(x,4-x,1)),(x,0,6)]