Generate the Himmelblau function
himmelblau(x)
x
a vector of x-values
the value of the function at x.