login
A162574
Primes of the form 2^x+x+y+2^y, with x and y integers of any sign.
3
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,1
EXAMPLE
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.
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! ]
CROSSREFS
Sequence in context: A049558 A049546 A049578 * A215823 A049542 A049582
KEYWORD
nonn
AUTHOR
EXTENSIONS
Examples added by R. J. Mathar, Sep 17 2009
STATUS
approved