Re: [問題] mathematica旋轉體問題
看板Mathematica作者chungyuandye (養花種魚數月亮賞星星)時間12年前 (2012/12/02 09:47)推噓0(0推 0噓 4→)留言4則, 2人參與討論串2/2 (看更多)
※ 引述《abbybao (小寶)》之銘言：
: 1. http://tinyurl.com/czwfb6v
: Q1:如果我想對 y=sin(x)對x=π/2 為旋轉軸旋轉要怎麼寫呢?
: ps: 圖裡是對z軸旋轉
: Q2:如果我想要標註點(1,0,0)的位置這有辦法做的到嗎?
: ps: 圖裡是點是我自己亂標的
(* RevolutionPlot3D 的轉軸必須是有原點出發的線，可參考 RevolutionAxis設定 *)
(* 所以要對x=π/2旋轉，必須把圖形平移，之後再做調整。 *)
temp = RevolutionPlot3D[Sin[Pi/2 - x], {x, -Pi/2, 0},
BoxRatios -> {1, 1, 0.4}]
Show[ListPlot3D[temp[[1, 1]] /. {x_, y_, z_} -> {x + Pi/2, y, z},
PlotStyle -> Opacity[0.5]],
Graphics3D[{PointSize[0.025], Red, Point[{1, 0, 0}]}]]
: 2. http://ppt.cc/LO-C
: 我想要看對題目裡的拋物面跟圓柱兩者圖形取交集所產生的圖形
: 這有辦法做的到嗎?
Plot3D[(x^2 + y^2)/4, {x, -10, 10}, {y, -10, 10},
RegionFunction -> Function[{x, y}, x^2 + y^2 <= 8 y],
Filling -> Bottom]
--
養花種魚數月亮賞星星
http://chungyuandye.twbbs.org
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.173.134.123
→
12/02 12:40, , 1F
12/02 12:40, 1F
→
12/02 12:42, , 2F
12/02 12:42, 2F
→
12/02 12:43, , 3F
12/02 12:43, 3F
→
12/02 15:17, , 4F
12/02 15:17, 4F
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 2 之 2 篇)：
Mathematica 近期熱門文章
PTT數位生活區 即時熱門文章
