|
| |
|
|
A048435
|
|
Concatenation of first n numbers in base 3.
|
|
16
| |
|
|
1, 5, 48, 436, 3929, 35367, 318310, 2864798, 77349555, 2088437995, 56387825876, 1522471298664, 41106725063941, 1109881576726421, 29966802571613382, 809103669433561330, 21845799074706155927, 589836575017066210047
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| a(6) = 1 2 10 11 12 20 = 35367
|
|
|
MATHEMATICA
| If[STARTPOINT==1, n={}, n=Flatten[IntegerDigits[Range[STARTPOINT-1], 3]]]; Table[AppendTo[n, IntegerDigits[w, 3]]; n=Flatten[n]; FromDigits[n, 3], {w, STARTPOINT, ENDPOINT}] [From Dylan Hamilton (phalarisbull(AT)gmail.com), Aug 04 2010]
|
|
|
CROSSREFS
| Cf. A047778, A007908.
Concatenation of first n numbers in other bases: 2: A047778, 3: this sequence, 4: A048436, 5: A048437, 6: A048438, 7: A048439, 8: A048440, 9: A048441, 10: A007908, 11: A048442, 12: A048443, 13: A048444, 14: A048445, 15: A048446, 16: A048447 [From Dylan Hamilton (Phalarisbull(AT)gmail.com), Aug 11 2010]
Sequence in context: A069985 A086776 A116431 * A023999 A126224 A108207
Adjacent sequences: A048432 A048433 A048434 * A048436 A048437 A048438
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Patrick De Geest (pdg(AT)worldofnumbers.com), May 15 1999.
|
|
|
EXTENSIONS
| added the closing bracket to my carelessly mistyped Mathematica program Dylan Hamilton (phalarisbull(AT)gmail.com), Aug 09 2010
|
| |
|
|
