|
|
A081797
|
|
Maximal coefficient (in absolute value) of the minimal polynomial P with integer coefficients such that P(sin(Pi/n)) = 0.
|
|
0
|
|
|
1, 1, 4, 2, 20, 2, 112, 8, 96, 4, 2816, 16, 16640, 8, 448, 256, 487424, 8, 2723840, 512, 11264, 32, 85917696, 512, 13107200, 80, 2236416, 13568, 15386804224, 16, 84515225600, 212992, 10911744, 448, 343670784, 13824, 15625695002624, 1024
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
It appears that when n > 3 is prime, n divides a(n). - T. D. Noe, Jan 06 2008
|
|
LINKS
|
|
|
EXAMPLE
|
x=sin(Pi/9) satisfies 64x^6 - 96x^4 + 36x^2 - 3 = 0, hence a(9)=96.
|
|
MATHEMATICA
|
Table[Max[Abs[CoefficientList[MinimalPolynomial[Sin[Pi/n], x], x]]], {n, 20}] (* T. D. Noe, Jan 06 2008 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|