A027708 n-th prime has odd number of 1's in binary expansion and (n+1)st prime also has odd number of 1's.

4, 5, 11, 12, 17, 18, 21, 27, 28, 31, 32, 36, 39, 40, 41, 42, 43, 46, 47, 48, 49, 50, 51, 52, 53, 80, 81, 82, 83, 84, 85, 93, 94, 102, 103, 106, 110, 111, 112, 115, 118, 119, 120, 126, 127, 128, 129, 134, 135, 143, 144, 156, 157, 160, 161, 162, 163, 167, 168, 171

Offset

0,1

Links

Harvey P. Dale, Table of n, a(n) for n = 0..1000

Mathematica

SequencePosition[Table[If[OddQ[DigitCount[p, 2, 1]], 1, 0], {p, Prime[ Range[ 200]]}], {1, 1}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 07 2020 *)

Crossrefs

Sequence in context: A188053 A372440 A261673 * A047374 A241653 A100107

Adjacent sequences: A027705 A027706 A027707 * A027709 A027710 A027711

Keyword

nonn,easy

Author

N. J. A. Sloane.

Extensions

More terms from Erich Friedman.

Status

approved