nelder-mead code snippets in matlab

use nelder-mead to find the maximum of sin(x)*e^-x in matlab