Wolfram
Mathematica
8의 신기능: 새롭게 향상된 핵심 알고리즘
◄
이전
|
다음
►
핵심 알고리즘
연립 방정식의 매개 변수화된 실제 솔루션 찾기
일곱개의 매개 변수
에 대한
해법을 구합니다.
In[1]:=
X
sol = {x, y, z} /. Solve[x^2 + y^2 == z^2 && x + y + a z == 1, {x, y}, Reals]; Show[{ContourPlot3D[ x^2 + y^2 == z^2, {x, -1, 1}, {y, -1, 1}, {z, 0, 1}], Table[ParametricPlot3D[Tooltip[sol], {z, 0, 1}, PlotStyle -> {{Thickness[0.01], Hue[0.12 a]}}], {a, 7}]}, ViewPoint -> {-2, 2, -10}, Boxed -> False, Axes -> False]
Out[1]=