plot([(e^x)/(1+x)^(1+x),e^(-x^2/3)],(x,0,1))