Group Abstract Group Abstract

Message Boards Message Boards

Export a ParametricPlot3D into a STL format file for 3D printing?

I want to export a ParametricPlot3D model into a STL format file for 3Dprinting. I attach the notebook file.

Attachments:
lissajous_3D_Report.nb
POSTED BY: Jaime Jiménez
3 Replies
Sort By:

Thank you Erik. I will do it.

POSTED BY: Jaime Jiménez
Erik Mahieu
Erik Mahieu
Posted 6 years ago

Modify PlotStyle in your code for model:

model = ParametricPlot3D[{Subscript[F, x][t, 2], 
   Subscript[F, y][t, 1], Subscript[F, z][t]}, {t, 0, 20}, 
  PlotStyle -> Tube[.15], Axes -> False, Boxed -> False, 
  PlotRange -> {{-2.2, 2.2}, {-1.2, 1.2}, {0, 5.5}}]

And use Printout3D to put model in STL file: ("model.stl" attached)

Printout3D[model, "model.stl"]

enter image description here

Attachments:
model.stl
POSTED BY: Erik Mahieu
Eric Rimbey
Eric Rimbey
Posted 6 years ago

I think that the problem is that the plot you're producing is only 1-dimensional. STL data represents a set of triangles, and Mathematica doesn't know how to turn that curve into a set of triangles. What I suggest you do is find a way to make your plot 3-dimensional. You could sample the function to create a set of points and generate a tube through those points, like this:

data = Table[{Subscript[F, x][t, 2], Subscript[F, y][t, 1], Subscript[F, z][t]}, {t, 0, 20, .05}];

g = Graphics3D[Tube[data]]

Now try to export g.
POSTED BY: Eric Rimbey
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Tag limit exceeded
Note: Only the first five people you tag will receive an email notification; the other tagged names will appear as links to their profiles.
Reply Preview
Attachments
Remove
or Discard