plot[y=e^x,y=2*x,y=e*x,y=3*x] x=-2to2,y=0to6