|
| |
|
|
A100751
|
|
Concatenate all natural numbers starting with 1 in binary like this 11011100101110111100010011010..., then a(n) = the number formed from the next n digits (by dropping leading zeros). 1,10,111,0010,11101,111000,... 1,10,111,10,11101,111000,...
|
|
2
| |
|
|
1, 10, 111, 10, 11101, 111000, 1001101, 1011110, 11011110, 1111100001, 11001010, 11101001010, 1101101011111, 11001110101, 101111100111011, 1110111111000001, 1100010100011, 100100100101100110, 1001111010001010011
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| 1,10,111,0010,11101,111000,... becomes 1,10,111,10,11101,111000,...
|
|
|
MATHEMATICA
| d = Flatten[ Table[ IntegerDigits[n, 2], {n, 45}]]; Table[ FromDigits[ Take[d, {n(n + 1)/2 + 1, (n + 1)(n + 2)/2}]], {n, 0, 18}] (from Robert G. Wilson v Nov 22 2004)
|
|
|
CROSSREFS
| Cf. A066547, A100489.
Sequence in context: A086996 A004284 A119484 * A004290 A159551 A105991
Adjacent sequences: A100748 A100749 A100750 * A100752 A100753 A100754
|
|
|
KEYWORD
| base,easy,nonn
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 20 2004
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 22 2004
|
| |
|
|
