Visualize solutions to equations

示例 4 步，在同一个会话中按顺序运行。每一步都在引擎上执行过，下面的输出就是它实际产生的。

第 1 步

eqn = x ^ 2 + 2a x + 1 == 0;

无输出——这一步是在为下一步做准备。

第 2 步

sol = Solve[eqn, x]

输出

{{x -> (-2*a - 2*Sqrt[-1 + a^2])/2}, {x -> (-2*a + 2*Sqrt[-1 + a^2])/2}}

第 3 步

forPlot = x /. sol

输出

{(-2*a - 2*Sqrt[-1 + a^2])/2, (-2*a + 2*Sqrt[-1 + a^2])/2}

第 4 步

Plot[forPlot, {a, -5, 5}]

输出

-Graphics-

用到的函数