|
Search: id:A070282
|
|
|
| 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. |
|
+0
2
|
|
| 1, 2, 2, 4, 16, 2401, 823543, 6103515625, 193630125104980427932766033374162714624, 121679161406852748316898260838871037524995421354288562472420444438058627601
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
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}]
|
|
CROSSREFS
|
Sequence in context: A165420 A129614 A070283 this_sequence A051285 A079556 A052628
Adjacent sequences: A070279 A070280 A070281 this_sequence A070283 A070284 A070285
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Joseph L. Pe (joseph_l_pe(AT)hotmail.com), May 09 2002
|
|
EXTENSIONS
|
Edited by Robert G. Wilson v (rgwv(AT)rgwv.com), May 14 2002
|
|
|
Search completed in 0.002 seconds
|
