A016300 Inverse of 2291st 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, 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, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, -1

Offset

0,1

Comments

Periodic with period length 2291. - Ray Chandler, Apr 07 2017

Links

Ray Chandler, Table of n, a(n) for n = 0..3000

Index entries for linear recurrences with constant coefficients, order 2184.

Index to sequences related to inverse of cyclotomic polynomials

Formula

a(n) = 1 for 0 <= n <= 28 or 2291 <= n <= 2319,

a(n) = 0 for 29 <= n <= 78 or 108 <= n <= 2290 or 2320 <= n <= 2369,

a(n) = -1 for 79 <= n <= 107 or 2370 <= n <= 2398, etc. - M. F. Hasler, Apr 21 2015

Maple

with(numtheory, cyclotomic); c := n->series(1/cyclotomic(n, x), x, 80); # Then c(2291) yields this sequence, or rather the first 80 terms of the power series.

Mathematica

CoefficientList[Series[1/Cyclotomic[2291, x], {x, 0, 90}], x] (* Harvey P. Dale, Apr 20 2015 *)

Prog

(PARI) Vec(1/polcyclo(2291)+O(x^100)) \\ Sparse representation: {1/polcyclo(2291)+O(x^2500)}. - M. F. Hasler, Apr 21 2015

Crossrefs

Cf. ..., A014676,... A015343, ..., A015952, ..., A016068, ..., A016126, ....

Sequence in context: A296077 A322674 A236861 * A016126 A016068 A015952

Adjacent sequences: A016297 A016298 A016299 * A016301 A016302 A016303

Keyword

sign

Author

Simon Plouffe

Status

approved