|
Search: id:A101305
|
|
|
| A101305 |
|
Begin with 0 and at each successive iteration append the next power of 10. |
|
+0
2
|
|
| 0, 10, 10100, 101001000, 10100100010000, 10100100010000100000, 101001000100001000001000000, 10100100010000100000100000010000000, 10100100010000100000100000010000000100000000
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
EXAMPLE
|
a(1)= 10
a(2)= 10100 (glue 10 and 100)
a(3)= 101001000 (glue 10 with 100 and 1000)
a(4)= 10100100010000
|
|
MATHEMATICA
|
f[n_] := FromDigits[ Flatten[ Table[ IntegerDigits[10^i], {i, n}]]]; Table[ f[n], {n, 8}] (from Robert G. Wilson v Dec 22 2004)
|
|
CROSSREFS
|
Cf. A011557.
Adjacent sequences: A101302 A101303 A101304 this_sequence A101306 A101307 A101308
Sequence in context: A076782 A139109 A119037 this_sequence A001098 A086164 A138119
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Jorge Coveiro (jorgecoveiro(AT)yahoo.com), Dec 22 2004
|
|
EXTENSIONS
|
Edited by Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 22 2004
|
|
|
Search completed in 0.002 seconds
|
