|
| |
|
|
A089648
|
|
Numbers whose numbers of 0's and 1's in binary representation differ at most by 1.
|
|
0
| |
|
|
0, 1, 2, 4, 5, 6, 9, 10, 12, 17, 18, 19, 20, 21, 22, 24, 25, 26, 28, 35, 37, 38, 41, 42, 44, 49, 50, 52, 56, 67, 69, 70, 71, 73, 74, 75, 76, 77, 78, 81, 82, 83, 84, 85, 86, 88, 89, 90, 92, 97, 98, 99, 100, 101, 102, 104, 105, 106, 108, 112, 113, 114, 116, 120, 135, 139
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
COMMENTS
| A031443 is a subsequence; abs(A037861(a(n)))<=1.
|
|
|
LINKS
| Index entries for sequences related to binary expansion of n
Eric Weisstein's World of Mathematics, Digit Count
|
|
|
MATHEMATICA
| Select[Range[0, 7! ], Abs[DigitCount[ #, 2, 0]-DigitCount[ #, 2, 1]]<2 &] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Feb 16 2010]
|
|
|
CROSSREFS
| Cf. A023416, A000120.
Sequence in context: A125297 A194469 A143072 * A062861 A120629 A169694
Adjacent sequences: A089645 A089646 A089647 * A089649 A089650 A089651
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Jan 02 2004
|
| |
|
|
