A027707 Primes with odd number of 1's in binary expansion such that next prime also has odd number of 1's.

7, 11, 31, 37, 59, 61, 73, 103, 107, 127, 131, 151, 167, 173, 179, 181, 191, 199, 211, 223, 227, 229, 233, 239, 241, 409, 419, 421, 431, 433, 439, 487, 491, 557, 563, 577, 601, 607, 613, 631, 647, 653, 659, 701, 709, 719, 727, 757, 761, 823, 827, 911, 919

Offset

0,1

Links

Table of n, a(n) for n=0..52.

Mathematica

c[ n_ ] := OddQ[ Count[ IntegerDigits[ n, 2 ], 1 ]]; Map[ Prime, Select[ Range[ 200 ], c[ Prime[ # ]]&&c[ Prime[ #+1 ]]& ]]

Crossrefs

Sequence in context: A109907 A121534 A083363 * A046861 A078917 A291349

Adjacent sequences: A027704 A027705 A027706 * A027708 A027709 A027710

Keyword

nonn

Author

N. J. A. Sloane.

Extensions

More terms from Erich Friedman.

Status

approved