|
|
A010891
|
|
Inverse of 5th cyclotomic polynomial.
|
|
16
|
|
|
1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 1
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
COMMENTS
|
D(n):= a(n+3) appears in the formula 2*exp(2*Pi*I/5) = (A(n+ B(n)*phi) + (C(n) + D(n)*phi)*sqrt(2 + phi)*I, with the golden section phi, I = sqrt(-1) and A(n) = A164116(n+5), B(n) = A080891(n) and C(n) = A156174(n+4) for n >= 0. See one of the comments on A164116. - Wolfdieter Lang, Feb 26 2014
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
with(numtheory, cyclotomic); c := n->series(1/cyclotomic(n, x), x, 80);
|
|
MATHEMATICA
|
CoefficientList[Series[1/Cyclotomic[5, x], {x, 0, 100}], x] (* Vincenzo Librandi, Apr 03 2014 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|