A256145 Primitive prime factors of the cyclotomic polynomial sequence Phi(8,k) in the order in which they occur.

2, 17, 41, 257, 313, 1297, 1201, 241, 193, 73, 137, 7321, 89, 233, 14281, 937, 1489, 65537, 41761, 113, 929, 3833, 160001, 97241, 3209, 139921, 331777, 11489, 26881, 6481, 614657, 353641, 3361, 409, 1129, 61681, 97, 6113, 1336337, 750313, 98801, 10529, 50857

Offset

1,1

Comments

Phi(8,k) = k^4 + 1.

Links

Table of n, a(n) for n=1..43.

Mathematica

prim = {}; Do[prim = Join[prim, Complement[First /@ FactorInteger[Cyclotomic[8, k]], prim]], {k, 1000}]; prim

Prog

(PARI) lista(nn) = {vs = []; for (n=1, nn, vp = factor(polcyclo(8, n))[, 1]; for (i=1, #vp, if (!vecsearch(vs, vp[i]), print1(vp[i], ", "); vs = vecsort(concat(vs, vp[i]), , 8); ); ); ); } \\ Michel Marcus, Mar 20 2015

Crossrefs

Cf. A005529, A096171, A248874, A256144.

Sequence in context: A289135 A072582 A186687 * A096172 A120745 A165637

Adjacent sequences: A256142 A256143 A256144 * A256146 A256147 A256148

Keyword

nonn

Author

Robert Price, Mar 16 2015

Status

approved