Algebraic Number

Author

Eric W. Weisstein
April 28, 2006

This notebook downloaded from http://mathworld.wolfram.com/notebooks/Numbers/AlgebraicNumber.nb.

For more information, see Eric's MathWorld entry http://mathworld.wolfram.com/AlgebraicNumber.html.

©2006 Wolfram Research, Inc. except for portions noted otherwise

Initialization

<<NumberTheory`AlgebraicNumberFields`

Code

AlgebraicQ[x_]:=Element[x,Algebraics]

Notation

TraditionalForm[Algebraics]

Table

alg=Select[ExactConstants,AlgebraicQ[ExactConstant[#]]&]

Length[alg]

TableForm[{#,Exponent[MinimalPolynomial[ExactConstant[#],x],x]}&/@alg,TableAlignments->{Left,Right}]