A162574 Primes of the form 2^x+x+y+2^y, with x and y integers of any sign.

2, 7, 17, 23, 31, 43, 71, 73, 107, 541, 2129, 4111, 4243, 9239, 18457, 32789, 32803, 65563, 65687, 73757, 135197, 147487, 264221, 589859, 786469, 1048633, 1049117, 4194329, 4194847, 4227109, 8388637, 8392739, 8405029, 8650793, 16908329

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jul 06 2009

Keywords

• nonn

Examples

			a(1) = A006127(1)+A006127(1) =2. a(2) = A006127(1)+A006127(3)=7.
a(3) = A006127(4)+A006127(3) =17. a(4) = A006127(5)+A006127(2) = 23.
		

Crossrefs

Cf. A162573, A006127.

Programs

Mathematica

f[x_,y_]:=2^x+x+y+2^y; lst={};Do[Do[p=f[x,y];If[PrimeQ[p],AppendTo[lst, p]],{y,-5!,6!}],{x,-5!,6!}];Take[Union[lst],5! ]

Extensions

Examples added by R. J. Mathar, Sep 17 2009