Plot3D[(((x/y)/290)^0.58)*290*y, {x,10, 1000}, {y,0.1, 2}