[go: up one dir, main page]

login
A020506
Cyclotomic polynomials at x = -7.
2
-7, -8, -6, 43, 50, 2101, 57, 102943, 2402, 117307, 2801, 247165843, 2353, 12111126301, 137257, 6568801, 5764802, 29078814248401, 117993, 1424861898171643, 5649505, 15772610449, 329554457, 3421093417510114543, 5762401, 79787519018560501, 16148168401, 1628413557556843
OFFSET
0,1
COMMENTS
Sequence has a(0) = x; see comments in A020501.
MAPLE
with(numtheory, cyclotomic); f := n->subs(x=-7, cyclotomic(n, x)); seq(f(i), i=0..64);
MATHEMATICA
Join[{-7}, Cyclotomic[Range[50], -7]] (* Paolo Xausa, Feb 26 2024 *)
PROG
(PARI) a(n) = if(n==0, -7, polcyclo(n, -7)); \\ Michel Marcus, Dec 17 2017
CROSSREFS
Sequence in context: A088660 A244263 A288023 * A193345 A197822 A055060
KEYWORD
sign
AUTHOR
EXTENSIONS
More terms from Michel Marcus, Dec 17 2017
STATUS
approved