Crie representações gráficas em 3D imprimíveis
Crie facilmente representações gráficas em 3D imprimíveis com opções de características de volume "ThickSurface" e "FilledSurface".
In[1]:=
![Click for copyable input](assets.pt-br/create-3d-printable-plots/In_13.png)
RevolutionPlot3D[{Sin[t] + Sin[5 t]/10, Cos[t] + Cos[5 t]/10}, {t, 0,
Pi}, RegionFunction -> (Sin[5 (#4 + #5)] > 0 &), Boxed -> False,
Axes -> None, PlotTheme -> "ThickSurface"]
Out[1]=
![](assets.pt-br/create-3d-printable-plots/O_14.png)
Out[15]=
![](assets.pt-br/create-3d-printable-plots/O_15.png)