프린팅용 플롯에 두께 부여

테마를 사용하여 3D 프린팅을 위해 채워진 플롯을 만듭니다.

In[1]:=

opts = {ImageSize -> 400, PlotRange -> All, PlotPoints -> 50};

In[2]:=

Plot3D[Cos[x^2 + y^2]/(x^2 + y^2 + 1), {x, -4, 4}, {y, -4, 4}, Evaluate[opts], RegionFunction -> Function[{x, y, z}, Sqrt[x^2 + y^2] <= 4 && (x <= 0 || y >= 0)], PlotTheme -> "FilledSurface"]

Out[2]=

대신, 플롯을 두껍게합니다.

In[3]:=

Plot3D[Cos[x^2 + y^2]/(x^2 + y^2 + 1), {x, -4, 4}, {y, -4, 4}, Evaluate[opts], RegionFunction -> Function[{x, y, z}, Sqrt[x^2 + y^2] <= 4 && (x <= 0 || y >= 0)], PlotTheme -> "ThickSurface"]

Out[3]=