OFFSET
1,1
COMMENTS
Terms given correspond to n = 1, 2, 3, 4, 5 and 6.
Next term >= 2^2^24 + 93. - Charles R Greathouse IV, Jun 07 2016
MAPLE
select(isprime, [seq(2^(2^n)+93, n=0..15)]); # Robert Israel, Jun 07 2016
MATHEMATICA
Select[Table[2^(2^n) + 93, {n, 0, 20}], PrimeQ]; // Vincenzo Librandi, Jun 07 2016
PROG
(PARI) g(n, m) = for(x=0, n, y=2^(2^x)+m; if(ispseudoprime(y), print1(y", ")))
(Magma) [a: n in [0..15] | IsPrime(a) where a is 2^(2^n)+93]; // Vincenzo Librandi, Jun 07 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Cino Hilliard, Apr 30 2009
STATUS
approved