请教3D直线怎么画图？

daphne_wj

x/(Sqrt[3]/3) = y/(Sqrt[3]/3) = z/(Sqrt[3]/3)

FreddyMusic

NDSolve + Plot3D

http://reference.wolfram.com/mathematica/ref/Plot3D.html

chyanog

1. ParametricPlot3D[{t, t, t}, {t, -2, 2}]
   
2. 
   
3. With[{r = 2, dt = .01},
   
4. ContourPlot3D[{x == y, y == z}, {x, -r, r}, {y, -r, r}, {z, -r, r},
   
5.   RegionFunction -> Function[{x, y, z}, Abs[x - y] < dt && Abs[y - z] < dt]]]

复制代码

daphne_wj

chyanog 发表于 2013-5-21 19:17

:victory:

正是我想要的效果。

daphne_wj

1. With[{r = 2, dt = .01},
   
2. ContourPlot3D[{x == y, y == z}, {x, -r, r}, {y, -r, r}, {z, -r, r},
   
3.   RegionFunction -> Function[{x, y, z}, Abs[x - y] < dt && Abs[y - z] < dt]]]

复制代码

这个不太懂哎，求讲解

daphne_wj

daphne_wj 发表于 2013-5-23 10:19
这个不太懂哎，求讲解

好吧，就算明白了