|
| |
|
|
A070312
|
|
a(1) = a(2) = 1; a(n) = a(n-1) + concatenation of a(n-2) and a(n-1).
|
|
0
| |
|
|
1, 1, 12, 124, 12248, 12424496, 1224824848992, 124244962449649697984, 1224824848992248489924899299395968, 1242449624496496979842449649697984496979849798598791936
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
EXAMPLE
| a(4) = a(3) + concatenation of a(2) and a(3) = 12 + 112 = 124.
|
|
|
MATHEMATICA
| a[n_] := (a[n - 1] + FromDigits[ Join[ IntegerDigits[ a[n - 2]], IntegerDigits[ a[n - 1]]]]); a[1] = a[2] = 1; Table[ a[n], {n, 1, 10}]
|
|
|
CROSSREFS
| Sequence in context: A016134 A045507 A155595 * A153427 A178626 A061114
Adjacent sequences: A070309 A070310 A070311 * A070313 A070314 A070315
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Joseph L. Pe (joseph_l_pe(AT)hotmail.com), May 11 2002
|
|
|
EXTENSIONS
| Edited by Robert G. Wilson v (rgwv(AT)rgwv.com), May 14 2002
|
| |
|
|