A014154 Inverse of 145th cyclotomic polynomial.

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, -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

Offset

0,1

Comments

Periodic with period length 145. - Ray Chandler, Apr 03 2017

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Index entries for linear recurrences with constant coefficients, signature (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, -1, 0, 1, 0, 0, -1, 0, 1, 0, 0, -1, 0, 1, 0, 0, -1, 0, 1, 0, 0, -1, 0, 1, 0, 0, -1, 0, 1, 0, -1, 0, 0, 1, 0, -1, 0, 0, 1, 0, -1, 0, 0, 1, 0, -1, 0, 0, 1, 0, -1, 0, 0, 1, 0, -1, 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).

Index to sequences related to inverse of cyclotomic polynomials

Maple

with(numtheory, cyclotomic); c := n->series(1/cyclotomic(n, x), x, 80);

Mathematica

CoefficientList[Series[1/Cyclotomic[145, x], {x, 0, 200}], x] (* Vincenzo Librandi, Apr 06 2014 *)

Crossrefs

Cf. similar sequences listed in A240328, A240467.

Sequence in context: A014379 A014164 A014319 * A014299 A014124 A014239

Adjacent sequences: A014151 A014152 A014153 * A014155 A014156 A014157

Keyword

sign,easy

Author

Simon Plouffe

Status

approved