24小时热门版块排行榜    

查看: 1068  |  回复: 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的回帖

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的回帖
查看全部 5 个回答

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的回帖

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的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 297求调剂 +11 戏精丹丹丹 2026-03-17 11/550 2026-03-21 15:43 by ColorlessPI
[考研] 22 350 本科985求调剂,求老登收留 +3 李轶男003 2026-03-20 3/150 2026-03-21 13:28 by 搏击518
[考研] 机械专硕299求调剂至材料 +3 kkcoco25 2026-03-16 4/200 2026-03-21 03:52 by JourneyLucky
[考研] 301求调剂 +10 yy要上岸呀 2026-03-17 10/500 2026-03-21 03:14 by JourneyLucky
[考研] 化学求调剂 +4 临泽境llllll 2026-03-17 5/250 2026-03-21 02:23 by JourneyLucky
[考研] 材料 336 求调剂 +3 An@. 2026-03-18 4/200 2026-03-21 01:39 by JourneyLucky
[考研] 一志愿南昌大学,327分,材料与化工085600 +9 Ncdx123456 2026-03-19 9/450 2026-03-20 23:41 by lovewei0727
[考研] 一志愿南京理工大学085701资源与环境302分求调剂 +4 葵梓卫队 2026-03-18 6/300 2026-03-20 23:02 by JourneyLucky
[考研] 288求调剂 +16 于海海海海 2026-03-19 16/800 2026-03-20 22:28 by JourneyLucky
[考研] 一志愿苏州大学材料求调剂,总分315(英一) +5 sbdksD 2026-03-19 5/250 2026-03-20 22:10 by luoyongfeng
[考研] 北科281学硕材料求调剂 +5 tcxiaoxx 2026-03-20 5/250 2026-03-20 21:35 by laoshidan
[考研] 0817 化学工程 299分求调剂 有科研经历 有二区文章 +22 rare12345 2026-03-18 22/1100 2026-03-20 20:39 by zhukairuo
[考研] 一志愿西安交通大学 学硕 354求调剂211或者双一流 +3 我想要读研究生 2026-03-20 3/150 2026-03-20 20:13 by JourneyLucky
[考研] 261求B区调剂,科研经历丰富 +3 牛奶很忙 2026-03-20 4/200 2026-03-20 19:34 by JourneyLucky
[考研] 一志愿南理工085701环境302求调剂院校 +3 葵梓卫队 2026-03-20 3/150 2026-03-20 19:28 by zhukairuo
[论文投稿] 申请回稿延期一个月,编辑同意了。但系统上的时间没变,给编辑又写邮件了,没回复 10+3 wangf9518 2026-03-17 4/200 2026-03-19 23:55 by babero
[考研] 344求调剂 +6 knight344 2026-03-16 7/350 2026-03-18 20:13 by walc
[考研] 东南大学364求调剂 +5 JasonYuiui 2026-03-15 5/250 2026-03-16 21:28 by 木瓜膏
[考研] 一志愿211 0703方向310分求调剂 +3 努力奋斗112 2026-03-15 3/150 2026-03-16 16:44 by houyaoxu
[考研] 085601材料工程315分求调剂 +3 yang_0104 2026-03-15 3/150 2026-03-15 10:58 by peike
信息提示
请填处理意见