|
|
A156974
|
|
Primes of the form 2^k + 29.
|
|
1
|
|
|
31, 37, 61, 157, 541, 8221, 32797, 131101, 8388637, 134217757, 8589934621, 137438953501, 8796093022237, 9223372036854775837, 590295810358705651741, 9444732965739290427421, 604462909807314587353117, 618970019642690137449562141, 166153499473114484112975882535043101, 170141183460469231731687303715884105757, 883423532389192164791648750371459257913741948437809479060803100646309917
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
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
|
|
MATHEMATICA
|
Delete[Union[Table[If[PrimeQ[2^n + 29], 2^n + 29, 0], {n, 1, 500}]], 1]
|
|
PROG
|
(Magma) [a: n in [0..300] | IsPrime(a) where a is 2^n+29 ]; // Vincenzo Librandi, Nov 27 2010
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Edwin Dyke (ed.dyke(AT)btinternet.com), Feb 19 2009
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|