A261535 Primes of the form Phi(8,n!), where Phi is the cyclotomic polynomial.
2, 17, 1297, 331777, 1503561738404723998944447273369600000001
Offset: 1
Keywords
Links
Programs
-
Mathematica
Select[Table[Cyclotomic[8, n!], {n, 0, 200}], PrimeQ] -
PARI
for(n=1, 500, if(isprime(k=polcyclo(8, n!)), print1(k", "))) \\ Altug Alkan, Nov 16 2015
Comments