OFFSET
1,1
COMMENTS
Starting with a(1) = 1 produces the all 1's sequence.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
A[1]:= 2: P:= 2:
for n from 2 to 100 do
x:= convert(convert(P, base, 10), `+`);
if length(x) > 997 then break fi;
A[n]:= x;
P:= P*x;
od:
seq(A[i], i=1..100); # Robert Israel, Jan 16 2025
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Franklin T. Adams-Watters, Jun 28 2009
STATUS
approved