|
| |
|
|
A059013
|
|
Odd number of 0's and even number of 1's in binary expansion.
|
|
2
|
|
|
|
0, 5, 6, 17, 18, 20, 23, 24, 27, 29, 30, 65, 66, 68, 71, 72, 75, 77, 78, 80, 83, 85, 86, 89, 90, 92, 95, 96, 99, 101, 102, 105, 106, 108, 111, 113, 114, 116, 119, 120, 123, 125, 126, 257, 258, 260, 263, 264, 267, 269, 270, 272, 275, 277, 278, 281, 282, 284, 287
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
T. D. Noe, Table of n, a(n) for n = 1..10000
|
|
|
MATHEMATICA
|
Select[Range[0, 300], EvenQ[DigitCount[#, 2, 1]] && OddQ[DigitCount[#, 2, 0]]&] (* Harvey P. Dale, Jun 13 2013 *)
|
|
|
PROG
|
(PARI) is(n)=hammingweight(n)%2==0 && hammingweight(bitneg(n, #binary(n)))%2 \\ Charles R Greathouse IV, Mar 26 2013
|
|
|
CROSSREFS
|
Cf. A000069, A001969, A059009-A059014.
Sequence in context: A186696 A034454 A185508 * A191144 A035595 A099571
Adjacent sequences: A059010 A059011 A059012 * A059014 A059015 A059016
|
|
|
KEYWORD
|
nonn,easy,changed
|
|
|
AUTHOR
|
Patrick De Geest, Dec 15 2000.
|
|
|
STATUS
|
approved
|
| |
|
|
