login
A015711
Inverse of 1702nd cyclotomic polynomial.
1
1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
OFFSET
0,1
COMMENTS
Periodic with period length 1702. - Ray Chandler, Apr 07 2017
MAPLE
with(numtheory, cyclotomic); c := n->series(1/cyclotomic(n, x), x, 80);
MATHEMATICA
CoefficientList[Series[1/Cyclotomic[1702, x], {x, 0, 851}], x] (* Harvey P. Dale, Dec 27 2018 *)
(* Alternative: *)
PadRight[ CoefficientList[Series[1/Cyclotomic[1702, x], {x, 0, 60}], x], 90, 0] (* Harvey P. Dale, Dec 27 2018 *)
PROG
(PARI) first(n)=Vec(1/polcyclo(1702)+O(x^(n+1))) \\ Charles R Greathouse IV, Jun 01 2026
CROSSREFS
Sequence in context: A014952 A015895 A014860 * A014722 A015435 A014676
KEYWORD
sign,easy
AUTHOR
STATUS
approved