핵심 알고리즘

연립 방정식의 매개 변수화된 실제 솔루션 찾기 

일곱개의 매개 변수 에 대한 해법을 구합니다.

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]=