Mathematica怎么绘制两个多边形的交?
mathematica吧
全部回复
仅看楼主
level 11
无情天魔精致
楼主
比如任意给定两个三角形,计算重叠部分的面积。
2019年11月06日 06点11分
1
吧务
level 12
无影东瓜
BlockRandom[
SeedRandom[5];
triangles = Triangle /@ RandomReal[1, {2, 3, 2}];
{Graphics[{Blue, Opacity[0.7], triangles}],
Area[RegionIntersection
@@
triangles]}
2019年11月06日 11点11分
2
无情天魔精致
这个不太实用啊。
2019年11月09日 00点11分
无影东瓜
@无情天魔精致
为什么不实用呢?你是想要用u和t表示的符号解吗?
2019年11月09日 03点11分
无情天魔精致
@无影东瓜
是啊。
2019年11月09日 03点11分
level 11
无情天魔精致
楼主
如果我要计算三角形{{0, 0}, {3, 0}, {0, 4}}和三角形
{{-2 Sin[u] (4 t Cos[u] + 3 (-1 + t) Sin[u]), 2 Cos[u] (4 t Cos[u] + 3 (-1 + t) Sin[u])},
{3 - 3 t + 3 t Cos[2 u] - 4 t Sin[2 u], 2 t Cos[u] (4 Cos[u] + 3 Sin[u])},
{-2 (-1 + t) Sin[u] (4 Cos[u] + 3 Sin[u]), 4 t + 4 (-1 + t) Cos[2 u] + 3 (-1 + t) Sin[2 u]}}
的重合部分的面积,怎么办?
2019年11月09日 00点11分
3
level 8
孺子剑牛不群
数值解已经很实用了。想得到解析解不是那么容易,因为要分多种情况讨论,即使求出来了,也可能一大坨分段函数组成的表达式,并不好看,这才叫不实用呢。
一些数学和算法问题,不能总偷懒太依靠软件,它只是辅助工具不是万能工具。
2019年11月09日 13点11分
4
level 11
无情天魔精致
楼主
我其实想要演示单墫的一个问题:
三角形对折,重合部分的面积与原三角形面积的比值最大是多少。
2019年11月09日 23点11分
5
无情天魔精致
@无影东瓜
2019年11月09日 23点11分
无影东瓜
@无情天魔精致
用NMaximize数值求解还是比较容易的,要解析解的话需要分类讨论的情况太多,我暂时没有好办法
2019年11月11日 06点11分
1