From Mathematica to 3D printing

Discussion in '3D Design Requests' started by 639351_deleted, Oct 9, 2014.

  1. I posted something like the below in the general discussion forum. Now I'm posting this in both the "3D modeler needed" forum and the "3D modelers for hire" forum.

    I have a board game. There are three different kinds of objects: 1 board (white), 12 identical red pieces, and 12 identical blue pieces. The board has some structure to it: 32 hexagonal wells. The red pieces are slightly different from the blue pieces (besides the color).

    I have all the objects in Mathematica, but I don't know if it's the kind of Mathematica description that (as a start, at least) is useful for 3D printing. I've defined the objects as polyhedra--(x,y,z) points and the faces and edges they make up.

    I need someone who can convert what I have into something that can be uploaded and 3D printed.
     
  2. Maybe I should just have posted something like this in the first place. This is a fictitious example, but it gives you an idea of what I have, understanding that 1) The scale is 1 Mathematica unit = 12.5 mm; 2) I really do have decimals like that, which are the result of working with the square root of 3, which is what working with regular hexagons will give you (I don't know what the 3D printing precision is, so I I just pasted the numbers as they were spat out by Mathematica's default setting); I want solid polyhedra--the below plots the faces, translucent so you can see through the thing (also I don't know how to draw solid complex polyhedra with Mathematica).

    What I need is to take something like this and convert it into a form suitable for 3D printing.

    I'll post this to other forums as well.

    v = {
    {0, 0, 0},
    {5.196152422706632`, 0, 0},
    {6.196152422706632`, 2, 0},
    {3.4641016151377544`, 4, 0},
    {1, 2, 0},

    {0.1, 0.2, 0.3},
    {6.296152422706632`, 0.1, 3.4},
    {7.196152422706632`, 2, 4.55},
    {4.6641016151377544`, 4, 6},
    {1.3, 2.8, 7}
    };
    i = {
    {1, 2, 7, 6}, {2, 3, 8, 7}, {3, 4, 9, 8}, {4, 5, 10, 9}, {5, 1, 6,
    10}, {1, 2, 3, 4, 5}, {6, 7, 8, 9, 10}
    };

    {Graphics3D[{Blue, Opacity[0.2],
    GraphicsComplex[v, Polygon]} ]}