1,1

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

4th term is Cyclotomic[7,128]=1+128+16384+2097152+..+4398046511104=4432676798593; the next 2 known terms have almost 200 or more than 1000 decimal digits.

Do[s=Cyclotomic[n, 2^n]; If[PrimeQ[s], Print[s]], {n, 1, 59}]

Cf. A070518-A070527.

Sequence in context: A138623 A206280 A070526 * A248046 A059017 A099667

Adjacent sequences: A070527 A070528 A070529 * A070531 A070532 A070533

nonn

Labos Elemer, May 02 2002

approved