login
A057664
Primes of the form p + 2^p where p is prime.
15
11, 37, 618970019642690137449562201, 266998379490113760299377713271194014325338065294581596243380200977777465722580068752870260867389
OFFSET
1,1
COMMENTS
The next term has 212 digits. - Harvey P. Dale, Feb 19 2018
MATHEMATICA
lst={}; Do[p=Prime[n]; If[PrimeQ[p=p+2^p], AppendTo[lst, p]], {n, 5!}]; lst (* Vladimir Joseph Stephan Orlovsky, Jan 28 2009 *)
Select[#+2^#&/@Prime[Range[100]], PrimeQ] (* Harvey P. Dale, Feb 19 2018 *)
CROSSREFS
Sequence in context: A162929 A116059 A100842 * A279770 A071853 A072313
KEYWORD
nonn
AUTHOR
Labos Elemer, Oct 16 2000
STATUS
approved