OFFSET
1,1
COMMENTS
a(6) is 730 digits.
MATHEMATICA
Select[Table[Cyclotomic[8, n!], {n, 0, 200}], PrimeQ]
PROG
(PARI) for(n=1, 500, if(isprime(k=polcyclo(8, n!)), print1(k", "))) \\ Altug Alkan, Nov 16 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Price, Aug 28 2015
STATUS
approved