A066149 Primes with an odd number of 0's in binary expansion.

2, 5, 11, 13, 17, 23, 29, 37, 41, 47, 59, 61, 71, 83, 89, 101, 113, 131, 137, 151, 157, 167, 173, 179, 181, 191, 193, 199, 211, 223, 227, 229, 233, 239, 241, 251, 257, 263, 269, 277, 281, 293, 311, 317, 337, 347, 349, 353, 359, 373, 383, 389, 401, 449, 461

Offset

1,1

Links

Indranil Ghosh, Table of n, a(n) for n = 1..20000 (terms 1..1000 from T. D. Noe)

Example

17 is in the sequence because 17 is a prime and 17 = 10001_2. '10001' has three 0's. - Indranil Ghosh, Feb 06 2017

Mathematica

Select[ Prime[ Range[ PrimePi[ 1000 ] ] ], OddQ[ Count[ IntegerDigits[ #, 2 ], 0 ] ]& ]

Prog

(PARI) forprime(p=2, 10^3, if( #select(x->x==0, digits(p, 2))%2==1, print1(p, ", "))); \\ Joerg Arndt, Jun 16 2018

Crossrefs

Cf. A066148, A027699, A027697.

Cf. A059009.

Sequence in context: A118753 A337649 A305033 * A215423 A019387 A019337

Adjacent sequences: A066146 A066147 A066148 * A066150 A066151 A066152

Keyword

nonn,easy,base

Author

R. K. Guy, Dec 13 2001

Extensions

More terms from Vladeta Jovovic and Klaus Brockhaus, Dec 13 2001

Status

approved