参考;
Plot3D[x^3 + y^3 - 2 x*y^2 - 2 x^2*y + x^2 - 2 y^2 - 10, {x, -10,
10}, {y, -10, 10},
RegionFunction -> Function[{x, y, z}, (x^2)/100 + (y^2)/81 <= 1.03],
PlotStyle -> Opacity[0.8], PlotRange -> All, Axes -> False,
Boxed -> False, BoxRatios -> {1, 1, 1.2}, PlotPoints -> 100,
Mesh -> 6, ColorFunctionScaling -> False,
ColorFunction -> Function[{x, y, z}, Hue[1.99 ArcTan[z]]]]
Plot3D[x^3 + y^3 - 2 x*y^2 - 2 x^2*y + x^2 - 2 y^2 - 10, {x, -10,
10}, {y, -10, 10},
RegionFunction -> Function[{x, y, z}, (x^2)/100 + (y^2)/81 <= 1.03],
PlotStyle -> Opacity[0.8], PlotRange -> All, Axes -> False,
Boxed -> False, BoxRatios -> {1, 1, 1.2}, PlotPoints -> 100,
Mesh -> 6, ColorFunctionScaling -> False,
ColorFunction -> Function[{x, y, z}, Hue[1.99 ArcTan[z]]]]