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

2, 5, 7, 11, 17, 19, 41, 43, 53, 61, 71, 79, 113, 139, 149, 179, 211, 277, 283, 541, 563, 1051, 2063, 2081, 2083, 2591, 4129, 4157, 8209, 8219, 8221, 8353, 16547, 32797, 32801, 32933, 33827, 65579, 65581, 66089, 131113, 131143, 131231, 131627, 135209

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jul 06 2009

Keywords

• nonn

Comments

Because 2^x and 2^y add to an integer only if x=y=-1, the set of x and y to be considered reduces to the set of x, y >= 0. - R. J. Mathar, Oct 29 2011

Crossrefs

Cf. A162573, A162574

Programs

Mathematica

f[x_,y_]:=2^x+2*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! ]