Plot[x^4 + Exp[-x^2]Sin[x], {x, -2, 2}]