A156974 - OEIS

%I #24 Nov 08 2023 14:27:30

%S 31,37,61,157,541,8221,32797,131101,8388637,134217757,8589934621,

%T 137438953501,8796093022237,9223372036854775837,590295810358705651741,

%U 9444732965739290427421,604462909807314587353117,618970019642690137449562141,166153499473114484112975882535043101,170141183460469231731687303715884105757,883423532389192164791648750371459257913741948437809479060803100646309917

%N Primes of the form 2^k + 29.

%F a(n) = 2^A156982(n) + 29. - _Elmo R. Oliveira_, Nov 08 2023

%p a := proc (n) if isprime(2^n+29) = true then 2^n+29 else end if end proc: seq(a(n), n = 1 .. 110); # _Emeric Deutsch_, Mar 14 2009

%t Delete[Union[Table[If[PrimeQ[2^n + 29], 2^n + 29, 0], {n, 1, 500}]],1]

%o (Magma) [a: n in [0..300] | IsPrime(a) where a is 2^n+29 ]; // _Vincenzo Librandi_, Nov 27 2010

%Y Cf. A000040, A156982.

%Y Cf. A057733 (2^k+3), A123250 (2^k+5), A104066 (2^k+7), A156940 (2^k+11).

%K nonn

%O 1,1

%A Edwin Dyke (ed.dyke(AT)btinternet.com), Feb 19 2009

%E More terms from _Emeric Deutsch_, Mar 14 2009

%E More terms from _Vincenzo Librandi_, Nov 27 2010