plot Piecewise[{{e^x,x<=1},{e,1<=x }}] for -2 < x < 2