|
Search: id:A070283
|
|
|
| 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
1
|
| |
|
|
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 this_sequence A070282 A051285 A079556
Adjacent sequences: A070280 A070281 A070282 this_sequence 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.
|
|
|
Search completed in 0.002 seconds
|
