| 查看: 2679 | 回复: 4 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[交流]
【求助】如何用Mathematica画三重积分区域图
|
|||
|
如何用Mathematica画几张曲面围成的三重积分域的图形? 比如Ω由平面 z=0, y=1, z=y 与抛物柱面 y=x^2 围成. [ Last edited by xxppyy on 2011-4-21 at 23:52 ] |
回复此楼» 猜你喜欢
不自信的我
已经有10人回复
-
磺酰氟产物，毕不了业了！
已经有8人回复
-
求助:我三月中下旬出站，青基依托单位怎么办？
已经有10人回复
-
26申博（荧光探针方向，有机合成）
已经有4人回复
-
要不要辞职读博？
已经有3人回复
-
论文终于录用啦！满足毕业条件了
已经有26人回复
-
2026年机械制造与材料应用国际会议 （ICMMMA 2026）
已经有4人回复
-
Cas 72-43-5需要30g，定制合成，能接单的留言
已经有8人回复
-
北京211副教授，35岁，想重新出发，去国外做博后，怎么样？
已经有8人回复
-
自荐读博
已经有3人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 重新画网格 说没有reference point
已经有4人回复
- 如何利用word 或者ultra-edit 将相同后缀的信息一次性提取出来
已经有7人回复
- 请教一个Mathematica积分的问题（重金求解）
已经有6人回复
- 旋转式压片机如何调节重量差异？
已经有14人回复
- 【原创】在WORD中使用Mathematica画的图形的体会
已经有13人回复
- 【求助】Mathematica画图问题
已经有7人回复
- 【求助】三重积分
已经有9人回复
- 【求助】三乙胺的重蒸问题
已经有4人回复
- 【讨论】word 2007如何快速画三线表
已经有3人回复
» 抢金币啦！回帖就可以得到:
-
北京理工大学郑长松教授课题组诚招2026年秋季博士/硕士研究生
+3/359
-
上海交通大学医学院王戈林课题组招聘博士后和助理研究员
+1/266
-
供应德国EXAKT艾卡特半导体导热散热材料三辊研磨机50 PLUS
+1/85
-
上海师范大学生物医用材料方向招收2026级博士研究生
+1/83
-
浙江师范大学国家杰青杨启华教授团队招收2026年博士研究生
+1/83
-
上海大学昝鹏教授、军事医学研究院伯晓晨研究员/倪铭副研究员 课题组招聘博士生
+1/80
-
深圳大学材料学院黄妍斐教授课题组诚招2026年秋季入学博士生
+1/78
-
上海大学昝鹏教授、军事医学研究院伯晓晨研究员/倪铭副研究员 课题组招聘博士生
+1/77
-
美国密歇根州立大学林学系杜海顺课题组招收全奖博士生及联合培养博士生
+1/74
-
中科院理化技术研究所张飞龙研究员/王树涛研究员团队招生（博士/硕士）
+1/32
-
SCI，计算机相关可以写
+1/22
-
SCI，计算机相关可以写
+1/21
-
SCI，计算机相关可以写
+1/19
-
长江学者团队招聘药学/生物信息学等方向高校教师7名(地点杭州、有事业编)+博后5名
+1/8
-
【博士后/科研助理招聘-北京理工大学-集成电路与电子学院-国家杰青团队】
+1/8
-
信息工程大学教授团队网络空间安全专业博士招生【2026年1月31日报名截止】
+1/8
-
中国科学院大学-杨晗课题组-诚聘-博士后、副研究员
+1/5
-
代算！材料学理论计算
+1/3
-
北京工业大学材料学院吴玉锋教授、王长龙研究员招收博士研究生
+1/3
-
双一流天津工业大学电信学院李鸿强教授招收2026年申请审核制博士3人
+1/3
★ ★ ★ ★ ★
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
2楼2011-05-23 14:13:56
★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
小木虫(金币+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