1,1
For n = 2 2^2 + 25 = 29
For n = 4 2^4 + 25 = 41
For n = 6 2^6 + 25 = 89
Delete[Union[Table[If[PrimeQ[2^n + 25], n, 0], {n, 1, 1000}]], 1]
A019434 (2^(2^n)+1) A057733 (2^n+3) A123250 (2^n+5)
A104072 (Primes of the form 2^n+25)
Sequence in context: A078106 A111082 A100433 * A083490 A083498 A172442
Adjacent sequences: A157003 A157004 A157005 * A157007 A157008 A157009
nonn
Edwin Dyke (ed.dyke(AT)btinternet.com), Feb 20 2009
Extended by Vladimir Joseph Stephan Orlovsky, Feb 27 2011
