[go: up one dir, main page]

login
A019326
Cyclotomic polynomials at x=8.
6
8, 7, 9, 73, 65, 4681, 57, 299593, 4097, 262657, 3641, 1227133513, 4033, 78536544841, 233017, 14709241, 16777217, 321685687669321, 261633, 20587884010836553, 16519105, 60247241209, 954437177, 84327972908386521673, 16773121, 1152956690052710401, 61083979321
OFFSET
0,1
MAPLE
with(numtheory, cyclotomic); f := n->subs(x=8, cyclotomic(n, x)); seq(f(i), i=0..64);
MATHEMATICA
Join[{8}, Cyclotomic[Range[50], 8]] (* Paolo Xausa, Feb 26 2024 *)
PROG
(Python)
from sympy.polys.specialpolys import cyclotomic_poly
def a(n): return 8 if n == 0 else cyclotomic_poly(n, x=8)
print([a(n) for n in range(27)]) # Michael S. Branicky, Aug 07 2021
(PARI) a(n) = if (n==0, 8, polcyclo(n, 8)); \\ Michel Marcus, Aug 07 2021
CROSSREFS
Cf. A020500 (x = 1), A019320-A019331 (x = 2..13).
Sequence in context: A318378 A198884 A212911 * A286839 A277915 A051011
KEYWORD
nonn
AUTHOR
STATUS
approved