Thingiverse
something made in Mathematica
di BasejCar
1
Download
3
Likes
0
Makes
I try to work with Mathematica. Its interesting.
n = RegionPlot3D[
y*y + z*z < 1 && x*x + y*y < 1 && x*x + z*z < 1, {x, -1, 1}, {y, -1,
1}, {z, -1, 1}, Boxed -> False, Axes -> None, PlotPoints -> 200,
Mesh -> None]
Export["Nekaj.stl", n]
n = RegionPlot3D[
y*y + z*z < 1 && x*x + y*y < 1 && x*x + z*z < 1, {x, -1, 1}, {y, -1,
1}, {z, -1, 1}, Boxed -> False, Axes -> None, PlotPoints -> 200,
Mesh -> None]
Export["Nekaj.stl", n]
Hai stampato questo modello? Accedi e condividi il tuo make!
Accedi per lasciare un commento
AccediAncora nessun commento – sii il primo!
