Wolfram Language

Visualização de volume

Engrosse representações gráficas para impressão

Use um tema para criar representações gráficas preenchidas para impressão 3D.

In[1]:=
Click for copyable input
opts = {ImageSize -> 400, PlotRange -> All, PlotPoints -> 50};
In[2]:=
Click for copyable input
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]=

Ou apenas engrosse a representação gráfica.

In[3]:=
Click for copyable input
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]=

Exemplos Relacionados

de en es fr ja ko ru zh