A155844 Primes of the form q*p+2^p where p is prime, q=13.

47, 97, 131293, 140737488355939, 2361183241434822607771

Offset

1,1

Links

Table of n, a(n) for n=1..5.

Mathematica

lst={}; Do[p=Prime[n]; If[PrimeQ[p=13*p+2^p], AppendTo[lst, p]], {n, 5!}]; lst

Crossrefs

Cf. A057664, A155841, A155842, A155843

Sequence in context: A319051 A180550 A176134 * A245688 A211331 A141961

Adjacent sequences: A155841 A155842 A155843 * A155845 A155846 A155847

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Jan 28 2009

Status

approved