|
Search: id:A103542
|
|
| |
|
| 0, 11, 110, 101, 100, 1111, 1010, 1001, 1000, 1011, 1110, 1101, 11100, 10111, 10010, 10001, 10000, 10011, 10110, 10101, 10100, 11111, 11010, 11001, 11000, 11011, 11110, 111101, 101100, 100111, 100010, 100001, 100000, 100011, 100110, 100101
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
The number of 1's in the n-th term appears to match A089400. - Benoit Cloitre (benoit7848c(AT)orange.fr), Mar 24 2005
|
|
REFERENCES
|
David Applegate, Benoit Cloitre, Philippe DELEHAM and N. J. A. Sloane, Sloping binary numbers: a new sequence related to the binary numbers, J. Integer Seq. 8 (2005), no. 3, Article 05.3.6, 15 pp.
|
|
LINKS
|
David Applegate, Benoit Cloitre, Philippe DELEHAM and N. J. A. Sloane, Sloping binary numbers: a new sequence related to the binary numbers [pdf, ps].
D. Applegate et al., Sloping Binary Number, A New Sequence Related to the Binary Numbers
|
|
MATHEMATICA
|
f[n_] := Block[{k = 1, s = 0, l = Max[2, Floor[Log[2, n + 1] + 2]]}, While[k < l, If[ Mod[n + k, 2^k] == 0, s = s + 2^k]; k++ ]; s]; Table[ FromDigits[ IntegerDigits[f[n] + n, 2]], {n, 0, 35}] (from Robert G. Wilson v Mar 23 2005)
|
|
CROSSREFS
|
Sequence in context: A054320 A124290 A094703 this_sequence A044343 A132123 A115822
Adjacent sequences: A103539 A103540 A103541 this_sequence A103543 A103544 A103545
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
njas, Mar 23 2005
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com) and Benoit Cloitre (benoit7848c(AT)orange.fr), Mar 23 2005
|
|
|
Search completed in 0.002 seconds
|
