I like the typesetting of Root objects. For example:
But can I get the same root object with its typesetting for simple roots like follows?
Mathematica Stack Exchange is a question and answer site for users of Wolfram Mathematica. It only takes a minute to sign up.Sign up to join this community
expr = 3 - Sqrt;
expr2 = expr // ToNumberField
The short form display of the
AlgebraicNumber is similar to that of
RootReduce will convert the expression back to the radical representation.
expr2 // RootReduce (* 3 - Sqrt *)
You can discover the polynomial with
p = MinimalPolynomial[3 - Sqrt] (* 7 - 6 #1 + #1^2 & *) p[x] (* 7 - 6 x + x^2 *) Root[p, 1] (* 3 - Sqrt *)
From the documentation of
For linear and quadratic polynomials
Root[f,k]is automatically reduced to explicit rational or radical form.