Mathematica/3DContours

Mathematica 透過使用 MeshFunctions 選項支援曲面上的 3D 等值線。

MeshFunctions 繪製 x、y、z 值的任意函式的 ISO 線，對於某些函式則繪製附加引數。

對於一組常規高程等值線，我們只需要使用 MeshFunctions->{#3&} 使用 z 值（第三個引數）的身份函式

例如

Plot3D[Sin[x y], {x, 0, 3}, {y, 0, 3}, MeshFunctions -> {#3 &}]

此外，可以使用 MeshShading 選項對等值線之間的區域進行著色。以下示例將影像劃分為 10 條高程等值線，並使用灰度進行著色。

Plot3D[Sin[x y], {x, 0, 3}, {y, 0, 3}, Mesh -> 10,  MeshFunctions -> {#3 &},  MeshShading -> GrayLevel /@ Range[0, 1, 0.1], Lighting -> "Neutral"]