通过Mathematica软件,利用基本几何图形和布尔运算对模型进行隐式建模(模型形状完全由方程描述)。这是华盛顿大学ME480 CAD 3DP课程的作业,旨在深入学习三维建模与3D打印技术。
模型的主体部分是通过将莫比乌斯带与球体进行布尔运算相加而创建的。
马赛克软件
基础代码由马克・甘特教授提供。
)布尔连接操作)
加入[f,不好意思,我现在没空处理这个问题。稍后我会回复你的。] := f与g的最小值
)布尔裁剪)
剪辑,不好意思,我现在没空处理这个问题。稍后我会回复你的。][:= Max[f, -g]
)翻译作品)
跨性别者 [女],不好意思,我现在没空。稍后再回复你。] := f /. x -> (x - s)
跨性别女性 [f],不好意思,我现在没空。稍后再回复你。] := f /. y -> (y - s)
跨性别者[f],不好意思,我现在没空。稍后再回复你。] := f /. z -> (z - s)
)旋转)
旋转函数 rotateRZ 的实现代码如下:,不过,] := f /. {x -> x < }余弦函数[a] + y <正弦函数 sinsin[a] + y < 正弦函数[a]与y的和余弦函数[a]
旋转Z轴,不过,] := rotateRZ[f, d2R[a]]
)声明一个原始几何体:球体)
sphere[rad_] := x^2 + y^2 + z^2 - rad^2
)声明一个原始几何图形:莫比乌斯带 -http://www.wolframalpha.com/input/?i=mobius+strip+Cartesian+equation)
莫比乌斯方程[a_]:-a^2 y - 2 a x z + x^2 y - 2 x^2 z + y^3 - 2 y^2 z +
其中y和z的平方的乘积小于1。
)创建几何图形:muckabout3)
muckabout3 = cut[sphere[2.75], mobius[3]]
)创建几何图形:trasn2rotatma3)
rotatemuckabout3 = rotateZ[muckabout3, 180]
transrotatema3 = transY[rotatemuckabout3, -0.5]
trans2rotatema3 = transX[transrotatema3, 0.5]
)创建几何图形:trans2rotatma13)
transrotatema13 = transY[muckabout3, 0.5]
trans2rotatema13 = transX[transrotatema13, -0.5]
)将两个几何图形拼接在一起)
joinmuckabout3 = join[trans2rotatema13, trans2rotatema3]
)创建几何图形:transrttma32)
muckabout32 = cut[sphere[6], mobius[3]]
rotatemuckabout32 = rotateZ[muckabout32, 180]
transrotatema32 = transX[rotatemuckabout32, 3]
transrtransma32 = transY[transrotatema32, 1]
transrttma32 = transZ[transrtransma32, -2.75]
)将两个几何图形拼接在一起)
joinmuck3s = join[joinedmuckabout3, transrttma32]
)绘制模型图,以便进行预览)
绘制等值线图:plt = ContourPlot3D[joinmuck3s == 0, {x, -10, 10}, {y, -10, 10}, {z, -10, 10}]
)将你的模型导出为STL文件格式。)
Export["ISMmodel1.stl", plt, "STL"]
由此得出的ISM方程式
最大值:[-7.5625 + x^2 + y^2 + z^2, 9y - x^2y - y^3 + 6xz + 2x^2z + 2y^2z - yz^2]
最大值:[-7.5625 + x^2 + y^2 + z^2, -9y + x^2y + y^3 - 6xz + 2x^2z + 2y^2z + yz^2]
最大值:[-7.5625 + x^2 + (0.5 + y)^2 + z^2, -9 (0.5 + y) + x^2 (0.5 + y) + (0.5 + y)^3 - 6 x z + 2 x^2 z + 2 (0.5 + y)^2 z + (0.5 + y) z^2]
最大值:[-7.5625 + (-0.5 + x)^2 + (0.5 + y)^2 + z^2, -9 (0.5 + y) + (-0.5 + x)^2 (0.5 + y) + (0.5 + y)^3 - 6 (-0.5 + x) z + 2 (-0.5 + x)^2 z + 2 (0.5 + y)^2 z + (0.5 + y) z^2]
最大值:[-7.5625 + x^2 + (-0.5 + y)^2 + z^2, 9 (-0.5 + y) - x^2 (-0.5 + y) - (-0.5 + y)^3 + 6 x z + 2 x^2 z + 2 (-0.5 + y)^2 z - (-0.5 + y) z^2]
最大值为:[ -7.5625 + (0.5 + x)^2 + (-0.5 + y)^2 + z^2, 9 (-0.5 + y) - (0.5 + x)^2 (-0.5 + y) - (-0.5 + y)^3 + 6 (0.5 + x) z + 2 (0.5 + x)^2 z + 2 (-0.5 + y)^2 z - (-0.5 + y) z^2 ]
[最小值][最大值] [ -7.5625 + (0.5 + x)^2 + (-0.5 + y)^2 + z^2, 9 (-0.5 + y) - (0.5 + x)^2 (-0.5 + y) - (-0.5 + y)^3 + 6 (0.5 + x) z + 2 (0.5 + x)^2 z + 2 (-0.5 + y)^2 z - (-0.5 + y) z^2 ], [最大值][ -7.5625 + (-0.5 + x)^2 + (0.5 + y)^2 + z^2, -9 (0.5 + y) +
最大值:[-36 + x^2 + y^2 + z^2, 9y - x^2y - y^3 + 6xz + 2x^2z + 2y^2z - yz^2]
最大值:[ -36 + x^2 + y^2 + z^2, -9y + x^2y + y^3 - 6xz + 2x^2z + 2y^2z + yz^2 ]
最大值为:[ -36 + (-3 + x)^2 + y^2 + z^2, -9y + (-3 + x)^2y + y^3 - 6(-3 + x)z + 2(-3 + x)^2z + 2y^2z + yz^2 ]
最大值为:[ -36 + (-3 + x)^2 + (-1 + y)^2 + z^2, -9 (-1 + y) + (-3 + x)^2 (-1 + y) + (-1 + y)^3 - 6 (-3 + x) z + 2 (-3 + x)^2 z + 2 (-1 + y)^2 z + (-1 + y) z^2 ]
最大值为:[ -36 + (-3 + x)^2 + (-1 + y)^2 + (2.75 + z)^2, -9 (-1 + y) + (-3 + x)^2 (-1 + y) + (-1 + y)^3 - 6 (-3 + x) (2.75 + z) + 2 (-3 + x)^2 (2.75 + z) + 2 (-1 + y)^2 (2.75 + z) + (-1 + y) (2.75 + z)^2 ]
[最小值][最大值( -7.5625 + (0.5 + x)^2 + (-0.5 + y)^2 + z^2, 9 (-0.5 + y) - (0.5 + x)^2 (-0.5 + y) - (-0.5 + y)^3 + 6 (0.5 + x) z + 2 (0.5 + x)^2 z + 2 (-0.5 + y)^2 z - (-0.5 + y) z^2)], [最大值( -7.5625 + (-0.5 + x)^2 + (0.5 + y)^2 + z^2, -9 (0.5 + y) + (-
Fuente del modelo
