Nothing Special   »   [go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A014048
Inverse of 39th cyclotomic polynomial.
1
1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -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, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -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, 1, 1, 1
OFFSET
0,1
COMMENTS
Periodic with period length 39. - Ray Chandler, Apr 03 2017
LINKS
Index entries for linear recurrences with constant coefficients, signature (1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 0, 1, -1, 0, 1, -1, 0, 1, -1, 0, 1, -1).
MAPLE
with(numtheory, cyclotomic); c := n->series(1/cyclotomic(n, x), x, 80);
MATHEMATICA
CoefficientList[Series[1/Cyclotomic[39, x], {x, 0, 100}], x] (* Vincenzo Librandi, Apr 04 2014 *)
LinearRecurrence[{1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 0, 1, -1, 0, 1, -1, 0, 1, -1, 0, 1, -1}, {1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0}, 81] (* Ray Chandler, Sep 15 2015 *)
PROG
(PARI) Vec(1/polcyclo(39)+O(x^99)) \\ Charles R Greathouse IV, Apr 01 2014
CROSSREFS
Sequence in context: A014123 A014060 A014111 * A014087 A014042 A014075
KEYWORD
sign,easy
AUTHOR
STATUS
approved