The OEIS Foundation is grateful to everyone who made a donation during our Annual Appeal. Visit the new and spectacular Pictures from the OEIS page!
1,2
Table of n, a(n) for n=1..7.
a[n_] := (Times @@ IntegerDigits[a[n - 1]])^(Times @@ IntegerDigits[a[n - 2]]); a[1] = 1; a[2] = 2; Table[a[n], {n, 1, 7}]
Cf. A070282.
Sequence in context: A165420 A171163 A129614 * A070282 A051285 A079556
Adjacent sequences: A070280 A070281 A070282 * A070284 A070285 A070286
base,nonn
Joseph L. Pe, May 09 2002
Edited by Robert G. Wilson v, May 14 2002
The next term is too large to include.
approved