|
| |
|
|
A070283
|
|
a(1) = 1; a(2) = 2; a(n) = [product of digits of a(n-1)]^[product of digits of a(n-2)] for n > 2.
|
|
0
| | |
|
|
|
OFFSET
| 1,2
|
|
|
MATHEMATICA
| a[n_] := (Times @@ IntegerDigits[a[n - 1]])^(Times @@ IntegerDigits[a[n - 2]]); a[1] = 1; a[2] = 2; Table[a[n], {n, 1, 7}]
|
|
|
CROSSREFS
| Cf. A070282.
Sequence in context: A171163 A165420 A129614 * A070282 A051285 A079556
Adjacent sequences: A070280 A070281 A070282 * A070284 A070285 A070286
|
|
|
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
The next term is too large to include.
|
| |
|
|
