3dplot[sin[sqrt(x^2 + y^2) ]/sqrt(x^2+y^2), {x, -4pi, 4pi}, {y, -4pi, 4pi}]