OFFSET
1,1
COMMENTS
Terms given correspond to n= 1, 2, 3 and 6.
Next term >= 2^2^39 + 13. - Charles R Greathouse IV, Jun 08 2016
MATHEMATICA
Select[Table[2^(2^n) + 13, {n, 0, 15}], PrimeQ]
PROG
(Magma) [a: n in [0..10] | IsPrime(a) where a is 2^(2^n)+13];
(PARI) for(n=1, 6, if(ispseudoprime(t=2^2^n+13), print1(t", "))) \\ Charles R Greathouse IV, Jun 08 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Jun 07 2016
STATUS
approved