| 查看: 2711 | 回复: 4 | |||
[交流]
【求助】如何用Mathematica画三重积分区域图
|
|
如何用Mathematica画几张曲面围成的三重积分域的图形? 比如Ω由平面 z=0, y=1, z=y 与抛物柱面 y=x^2 围成. [ Last edited by xxppyy on 2011-4-21 at 23:52 ] |
回复此楼» 猜你喜欢
依托企业入选了国家启明计划青年人才。有无高校可以引进的。
已经有12人回复
-
AI 太可怕了，写基金时，提出想法，直接生成的文字比自己想得深远，还有科学性
已经有11人回复
-
天津大学招2026.09的博士生，欢迎大家推荐交流（博导是本人）
已经有11人回复
-
表哥与省会女结婚，父母去帮带孩子被省会女气回家生重病了
已经有9人回复
-
同年申请2项不同项目，第1个项目里不写第2个项目的信息，可以吗
已经有10人回复
-
依托企业入选了国家启明计划青年人才。有无高校可以引进的。
已经有11人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 重新画网格 说没有reference point
已经有4人回复
- 如何利用word 或者ultra-edit 将相同后缀的信息一次性提取出来
已经有7人回复
- 请教一个Mathematica积分的问题（重金求解）
已经有6人回复
- 旋转式压片机如何调节重量差异？
已经有14人回复
- 【原创】在WORD中使用Mathematica画的图形的体会
已经有13人回复
- 【求助】Mathematica画图问题
已经有7人回复
- 【求助】三重积分
已经有9人回复
- 【求助】三乙胺的重蒸问题
已经有4人回复
- 【讨论】word 2007如何快速画三线表
已经有3人回复
» 抢金币啦！回帖就可以得到:
-
西湖大学2026年秋季入学物理学、光学、电子信息方向博士生有名额速来！！！
+2/264
-
西湖大学2026年秋季入学物理学、光学、电子信息方向博士生有名额速来！！！
+2/256
-
西湖大学拓扑光学、非厄米光学、太赫兹方向博士后招聘
+2/256
-
-大龄未婚男找女朋友结婚
+1/241
-
华南师范大学（211）- 光电科学与工程学院 - 申请审核制（2026年4-5月份面试考核）
+2/106
-
澳洲西澳大学Dr Yiran Liu招全额奖学金和CSC奖学金博士生（3.8万澳币/年）
+1/105
-
龙凤Tai——写给恋人的第100封情书
+1/92
-
石河子大学化学化工学院CJ学者领衔分子炼油团队招收博士、硕士。【接收调剂】
+1/88
-
江西理工大学联合中国科学院赣江创新研究院招收2026级博士研究生
+1/82
-
人间烟火，实则就是追求最简单的快乐
+1/77
-
好玩的不敢搞，能搞的不挣钱，能挣钱的我不会做
+1/67
-
香港中文大学医学院 诚聘 研究助理教授 (医工结合/生物信息学方向)
+1/36
-
澳大利亚麦考瑞大学(Macquarie University)国际博士硕士全额奖学金-计算机-26年中开学
+1/34
-
湖南大学袁达飞课题组招收第二批2026年9月入学的博士研究生一名
+1/26
-
澳大利亚麦考瑞大学(Macquarie University)国际博士硕士全额奖学金-计算机-26年中开学
+1/16
-
电子科技大学李世彬课题组招聘传感器方向博士及博士后
+1/11
-
江汉大学轩亮教授课题组招博士研究生/博士后
+1/4
-
广东工业大学马琳教授课题组招收2026年博士（材料物理与化学、光学专业）
+1/4
-
澳科大药学院诚招2026年秋季药剂学/生物材料硕士研究生（2026年3月5日报名截止）
+1/4
-
【经验分享】CRISPR基因敲除细胞系构建全流程踩坑指南——从递送方式选择到克隆筛选
+1/2
2楼2011-05-23 14:13:56
★ ★ ★ ★ ★
xxppyy(金币+2):谢谢参与
xxppyy(金币+10): 有启发！但我希望图中只有这一立体本身，没有多余部分，是否也能做到？谢谢。 2011-05-27 22:24:53
dubo(金币+4): 谢谢应助 2011-05-28 14:08:53
xxppyy(金币+2):谢谢参与
xxppyy(金币+10): 有启发！但我希望图中只有这一立体本身，没有多余部分，是否也能做到？谢谢。 2011-05-27 22:24:53
dubo(金币+4): 谢谢应助 2011-05-28 14:08:53
|
aa = ParametricPlot3D[{x, x^2, z}, {x, -2, 2}, {z, 0, 3}, DisplayFunction -> Identity]; bb = ParametricPlot3D[{x, y, 0}, {x, -2, 2}, {y, 0, 10}, DisplayFunction -> Identity]; cc = ParametricPlot3D[{x, 1, z}, {x, -2, 2}, {z, 0, 10}, DisplayFunction -> Identity]; dd = ParametricPlot3D[{x, y, y}, {x, -2, 2}, {y, 0, 10}, DisplayFunction -> Identity]; Show[{aa, bb, cc, dd}, PlotRange -> {{-2, 2}, {0, 2}, {0, 2}}, ViewPoint -> {2, 0.3, 1}, DisplayFunction -> $DisplayFunction] 结果：  将就着看吧！ |
3楼2011-05-27 15:56:12
4楼2011-05-27 17:00:09
★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖
dubo(金币+1): 多谢应助 2011-05-28 14:07:00
dubo(金币+1): 我印象中matlab也可以，呵呵 2011-05-28 14:09:44
微尘、梦想(金币+14): 代发！ 2011-05-31 09:59:10
小木虫(金币+0.5):给个红包，谢谢回帖
dubo(金币+1): 多谢应助 2011-05-28 14:07:00
dubo(金币+1): 我印象中matlab也可以，呵呵 2011-05-28 14:09:44
微尘、梦想(金币+14): 代发！ 2011-05-31 09:59:10
|
aa = ParametricPlot3D[{x, x^2, Min[z, x^2]}, {x, -1, 1}, {z, 0, 1}, DisplayFunction -> Identity]; bb = ParametricPlot3D[{x, Max[y, x^2], 0}, {x, -1, 1}, {y, 0, 1}, DisplayFunction -> Identity]; cc = ParametricPlot3D[{x, 1, z}, {x, -1, 1}, {z, 0, 1}, DisplayFunction -> Identity]; dd = ParametricPlot3D[{x, Max[y, x^2], y}, {x, -1, 1}, {y, 0, 1}, DisplayFunction -> Identity]; Show[{aa, bb, cc, dd}, PlotRange -> {{-1.5, 1.5}, {0, 1.5}, {0, 1.5}}, ViewPoint -> {2, 0.3, 1}, DisplayFunction -> $DisplayFunction] 结果：  |
5楼2011-05-28 13:30:29