|
|
A070282
|
|
a(1) = 1; a(2) = 2; a(n) = [sum of digits of a(n-1)]^[sum of digits of a(n-2)] for n > 2.
|
|
1
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
The next term, a(11), has 381 digits. - Harvey P. Dale, Jan 08 2013
|
|
LINKS
|
Table of n, a(n) for n=1..10.
|
|
MATHEMATICA
|
a[n_] := (Plus @@ IntegerDigits[a[n - 1]])^(Plus @@ IntegerDigits[a[n - 2]]); a[1] = 1; a[2] = 2; Table[ a[n], {n, 1, 10}]
nxt[{a_, b_}]:={b, Total[IntegerDigits[b]]^Total[IntegerDigits[a]]}; Transpose[ NestList[nxt, {1, 2}, 10]][[1]] (* Harvey P. Dale, Jan 08 2013 *)
|
|
CROSSREFS
|
Sequence in context: A171163 A129614 A070283 * A267218 A051285 A079556
Adjacent sequences: A070279 A070280 A070281 * A070283 A070284 A070285
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Joseph L. Pe, May 09 2002
|
|
EXTENSIONS
|
Edited by Robert G. Wilson v, May 14 2002
|
|
STATUS
|
approved
|
|
|
|