[問題] 真囧～我畫不出來垂直面切片的圖

[harry901 (forcing to A cup)]

首先剛剛換了稍微新的版本  mathematica7  複製貼上會出現編譯亂碼的問題就沒了

這問題非常簡單  可是  怎麼弄都弄不出來  XD
(以下z,t,function(z,t)分別對應到mathematica系統預設的X,Y,Z方向)
覺得程式碼複雜可以跳過
=============================程式碼========================================
R3[z_, t_] = PBSC[z, t]; (*這是曲面圖,已經給定PBSC函數*)

g3 = Plot3D[R3[z, t] - Pc, {z, -10, 10}, {t, 0, 8},
   ViewPoint -> {-0.4, 1, 0.3}, AxesLabel -> {"z(%)", "t", "損益"},
   TextStyle -> FontSize -> 16];

R4[z_, t_] = 0;

g4 = Plot3D[0, {z, -10, 10}, {t, 0, 16}, PlotStyle -> Opacity[0.5]];
(*這是所有水平切面＝0的圖, 在mathematica7系統裡面是定義fun=0去畫出每一個Z軸=0*)
(*也可使用Plot3D[R4[z,t],...*)

g5 = Plot3D[z = 0, PlotStyle -> Opacity[0.5]];
(*想畫一個所有垂直方向在z=0的切面,這邊的z=0應該相當於系統的X=0*)

Show[g3, g4, g5, PlotRange -> All]
結果都沒辦法畫出來垂直方向的切片.....
=============================end code======================================

問題簡化：  若我想在3D圖畫出  x=3, y=6, z=8  的三個切面  試問該如何畫呢?

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 111.243.231.96
→ chungyuandye:ContourPlot3D[{x==3,y==6,z==8},{x,0,10},{y,0,10},
→ chungyuandye:{z,0,10}]
→ harry901:謝謝  我笨了我居然忘記還有等值函數可以用 @@