login
A080167
Primes beginning with '10' and ending with '01' in binary representation.
2
5, 17, 37, 41, 73, 89, 137, 149, 157, 173, 181, 257, 269, 277, 281, 293, 313, 317, 337, 349, 353, 373, 521, 541, 557, 569, 577, 593, 601, 613, 617, 641, 653, 661, 673, 677, 701, 709, 733, 757, 761, 1033, 1049, 1061, 1069, 1093, 1097, 1109, 1117, 1129, 1153
OFFSET
1,1
COMMENTS
Intersection of A002144 and A080165.
LINKS
EXAMPLE
A000040(12)=37 -> '100101' therefore 37 is a term.
MATHEMATICA
Select[Prime[Range[200]], Take[IntegerDigits[#, 2], 2]=={1, 0}&&Take[ IntegerDigits[#, 2], -2]=={0, 1}&] (* Harvey P. Dale, May 10 2015 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Feb 04 2003
STATUS
approved