Visualize solutions to equations

Example 4 steps, run in order in one session. Every step was executed against the engine and the output below is what it produced.

Step 1

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

No output - this step sets something up for the next one.

Step 2

sol = Solve[eqn, x]

Output

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

Step 3

forPlot = x /. sol

Output

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

Step 4

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

Output

-Graphics-

Run this on Qurak All recipes

Functions used

Related recipes

All recipes · Function reference · Use this from an MCP client