24小时热门版块排行榜    

查看: 1074  |  回复: 4

kabaisun

专家顾问 (正式写手)

[求助] Mathematica怎么做如下两参数三维面的等高线图? 已有2人参与

会不会太简单了只要一行代码可以解决的事??最近脑洞有点大。。
举个栗子:ParametricPlot3D[{r Cos[t], r Sin[t], (r - 1/r) Sin[t]}, {t, 0,
  2 Pi}, {r, 0, 1}]
问:如何做出这个三维面的等高线图?
注意:请不要把r转成x,y的表达式!!那个太简单不是,只要contour一下就好了
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

严实诚勇
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xzczd

木虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
kabaisun: 金币+20, 有帮助 2015-03-22 19:40:45
据我所知,没有除换元以外的方法……非要说的话这个大概是一种,但是这还不如换元呢(效果也算不好):
CODE:
pic = ParametricPlot3D[{r Cos[t], r Sin[t], (r - 1/r) Sin[t]}, {t, 0,
    2 Pi}, {r, 0, 1}, MeshFunctions -> (#3 &), Mesh -> {Range[-2, 2]}]
Graphics[Cases[Normal@pic, Line[a_] :> Line[Most /@ a], Infinity], Frame -> True]

Mathematica怎么做如下两参数三维面的等高线图?

另,一个稍有相关的帖:http://tieba.baidu.com/p/3476558381
小木虫Mathematica版块已毁(当然原本也不咋的),建议大家前往百度贴吧或Stackexchange。
2楼2015-03-22 18:13:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

kabaisun

专家顾问 (正式写手)

引用回帖:
2楼: Originally posted by xzczd at 2015-03-22 18:13:23
据我所知,没有除换元以外的方法……非要说的话这个大概是一种,但是这还不如换元呢(效果也算不好):


pic = ParametricPlot3D
Graphics[Cases, Frame -> True]



另,一个稍有相关的帖:http://tie ...

谢谢你的推荐,确实比较相关
严实诚勇
3楼2015-03-22 19:40:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

cooooldog

铁杆木虫 (著名写手)

ส็็็

视角调整为俯视图不就是了吗? 改变mesh的样子
ส็็็็็็็็็็็็็็็็็็็็
4楼2015-03-24 10:43:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wufengseu

木虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
kabaisun: 金币+15, 有帮助 2015-03-24 22:41:58
如果注意到参数图形和等高图绘制所需要的数据及其联系,可以这样解决问题。
Mathematica怎么做如下两参数三维面的等高线图?-1
Snap1.jpg

5楼2015-03-24 15:01:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 kabaisun 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 初试 317 +7 半拉月丙 2026-03-20 7/350 2026-03-21 22:26 by peike
[考研] 材料求调剂 +5 @taotao 2026-03-21 5/250 2026-03-21 20:55 by lbsjt
[考研] 材料工程专硕 348分求调剂 +3 冬辞. 2026-03-17 5/250 2026-03-21 18:47 by 学员8dgXkO
[考研] 306求0703调剂一志愿华中师范 +5 纸鱼ly 2026-03-21 5/250 2026-03-21 17:11 by 学员8dgXkO
[基金申请] 学校已经提交到NSFC,还能修改吗? 40+4 babangida 2026-03-19 9/450 2026-03-21 16:12 by babangida
[考研] 330求调剂0854 +3 assdll 2026-03-21 3/150 2026-03-21 13:01 by 搏击518
[考研] 能源材料化学课题组招收硕士研究生8-10名 +5 脱颖而出 2026-03-16 15/750 2026-03-21 10:16 by 脱颖而出
[考研] 一志愿中国石油大学(华东) 本科齐鲁工业大学 +3 石能伟 2026-03-17 3/150 2026-03-21 02:22 by JourneyLucky
[考研] 328求调剂,英语六级551,有科研经历 +4 生物工程调剂 2026-03-17 8/400 2026-03-21 02:12 by JourneyLucky
[考研] 材料 336 求调剂 +3 An@. 2026-03-18 4/200 2026-03-21 01:39 by JourneyLucky
[考研] 南京大学化学376求调剂 +3 hisfailed 2026-03-19 6/300 2026-03-20 23:43 by hisfailed
[考研] 260求调剂 +3 朱芷琳 2026-03-20 3/150 2026-03-20 20:35 by 学员8dgXkO
[考研] 289求调剂 +6 怀瑾握瑜l 2026-03-20 6/300 2026-03-20 20:30 by 学员8dgXkO
[考研] 08工学调剂 +5 用户573181 2026-03-20 5/250 2026-03-20 15:47 by xia_2003
[考研] 0703化学调剂 +5 pupcoco 2026-03-17 8/400 2026-03-19 13:58 by houyaoxu
[考研] 344求调剂 +6 knight344 2026-03-16 7/350 2026-03-18 20:13 by walc
[考研] 0703化学调剂 +3 妮妮ninicgb 2026-03-17 3/150 2026-03-18 10:29 by macy2011
[考研] 308求调剂 +4 是Lupa啊 2026-03-16 4/200 2026-03-17 17:12 by ruiyingmiao
[考研] 一志愿211 0703方向310分求调剂 +3 努力奋斗112 2026-03-15 3/150 2026-03-16 16:44 by houyaoxu
[考研] 中科院材料273求调剂 +4 yzydy 2026-03-15 4/200 2026-03-16 15:59 by Gaodh_82
信息提示
请填处理意见