| Original Message (ID '129640') By Michael: |
| Try applying the function N[..]:
N[{{Root[-1 - #1 - 2 #1^2 + #1^3 &,
1]}, {{1 + 5 Root[-1 - #1 - 2 #1^2 + #1^3 &, 1] -
2 Root[-1 - #1 - 2 #1^2 + #1^3 &, 1]^2, -2 -
4 Root[-1 - #1 - 2 #1^2 + #1^3 &, 1] +
2 Root[-1 - #1 - 2 #1^2 + #1^3 &, 1]^2,
3 Root[-1 - #1 - 2 #1^2 + #1^3 &, 1] -
Root[-1 - #1 - 2 #1^2 + #1^3 &, 1]^2,
1 - 5 Root[-1 - #1 - 2 #1^2 + #1^3 &, 1] +
2 Root[-1 - #1 - 2 #1^2 + #1^3 &, 1]^2, 1}}} ]
(The Root[..] function represents the exact values. The function N[..] converts them to approximate Reals.) |
|
