Message Boards Message Boards

Love heart jewelry I: 3D printing of parametric region

Frederick Wu, SMEE
Posted 4 years ago

enter image description here

Attachments:
myHeart_V6.stl
POSTED BY: Frederick Wu
11 Replies
Sort By:

Admins, if this posting is not appropriate by Wolfram Community standards please advise and delete.

Hi Frederick, Can't see how to contact you via the Wolfram Community, would like to contact you about how I've used your heart design, tried on LinkedIn didn't find you, you are welcome to join me on LinkedIn at https://www.linkedin.com/in/drdarrenkelly.
POSTED BY: Darren Kelly
Frederick Wu
Frederick Wu, SMEE
Posted 11 months ago

Hi Kelly,

You can contact me by email: wu_fei_1978@163.com, or we can disuss your issue in Wolfram Community.
POSTED BY: Frederick Wu
Frederick Wu
Frederick Wu, SMEE
Posted 3 years ago

Hi Jonathan,

Thank you for your interesting for my heart design. In the case, Wolfram Mathematica doesn't work with RegionUnion, You can use Materielise Magics or other software to do region Boolean calculation.

I attached the heart with a ring in STL file format ( at top ) for your reference.
POSTED BY: Frederick Wu

Thanks once again Frederick!

Hope to see more posts from you in future...

Jonathan
POSTED BY: Jonathan Kinlay

Hi Frederick,

I am still struggling to replicate your rather lovely design. I created a ring region as you suggested:

ringRegion = 
 TransformedRegion[
  TransformedRegion[ringregion, RotationTransform[Pi/2, {1, 0, 0}]], 
  TranslationTransform[{0, 0, 0.5}]]

and then RegionUnion should mesh the two stl images together:

union = RegionUnion[heartRegion, ringRegion]

But, in fact, in Mathematica V12.3, the output appears to be identical to the original heartRegion.

Any idea what the issue could be?
POSTED BY: Jonathan Kinlay

Congratulations! Your post was highlighted on the Wolfram's official social media channels. Thank you for your contribution. We are looking forward to your future posts.
POSTED BY: EDITORIAL BOARD

That's very helpful Frederick.

Thanks for a great presentation!
POSTED BY: Jonathan Kinlay
Frederick Wu
Frederick Wu, SMEE
Posted 4 years ago

Hi Jonathan,

Thank you for interesting my post. You can create a chain-ring with below steps.

  1. create an annulus in 3D as a chain-ring

         ring = With[{r1 = 0.4, r2 = 2},
          ParametricPlot3D[{(r2 + Cos[v]) r1 Sin[u], (r2 + Cos[v]) r1  Cos[u],
             r1 Sin[v]},
           {u, 0, 2 Pi}, {v, 0, 2 Pi},
           MaxRecursion -> 3, PlotPoints -> 50]];

  2. Rotate, translate and scaling transform, if necessary.

    ringRotate = TransformedRegion[TransformedRegion[ring,
    RotationTransform[Pi/2, {1, 0, 0}]], 
   TranslationTransform[{0, 0, 0.5}]];

  3. Then Boolean union on your target region.

    union = RegionUnion[targetRegion, ringRotate]

enter image description here

I work with a 3D printing supplier in China, I am afraid, they will be no sourcing advantage for your prototype with considerable shipping cost and customs tax. However, I found a few printing services in U.S. for you to pick.

https://i.materialise.com/blog/en/3d-printed-jewelry/

https://www.shapeways.com/industry/jewelry/

https://envisiontec.com/3d-printing-industries/professional/jewelry/

https://pick3dprinter.com/3d-printing-jewelry-service/
POSTED BY: Frederick Wu

Hi Frederick,

Very nice post! I have a couple of questions:

1) How did you create the loop for the chain and attach it to the heart structure?

2) Which 3D printing service did you use for your design?
POSTED BY: Jonathan Kinlay
Soft Ware
Soft Ware
Posted 4 years ago

Hello and thank you for posting your work on the Love Heart. What a wonderful gift for your wife, xx. I am an artist working in IT and found it fascinating that a wax casting could be created this way. I also make and collect heart jewellery and objects and your information was really valuable. Thanks again, Denise UK
POSTED BY: Soft Ware

enter image description here -- you have earned Featured Contributor Badge enter image description here Your exceptional post has been selected for our editorial column Staff Picks http://wolfr.am/StaffPicks and Your Profile is now distinguished by a Featured Contributor Badge and is displayed on the Featured Contributor Board. Thank you!
POSTED BY: EDITORIAL BOARD
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

Group Abstract Group Abstract