Plot Differential Equation Mathematica