This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A162251 #7 Jan 17 2025 02:41:57 %S A162251 2,2,4,7,4,16,22,34,31,34,49,70,67,61,85,88,76,70,94,106,76,133,139, %T A162251 133,157,187,193,187,202,196,220,196,202,214,229,232,301,259,247,304, %U A162251 346,304,337,358,355,358,328,376,409,412,445,466,472,466,445,475,481,520 %N A162251 Sum of digits of product of previous terms, with a(1) = 2. %C A162251 Starting with a(1) = 1 produces the all 1's sequence. %H A162251 Robert Israel, <a href="/A162251/b162251.txt">Table of n, a(n) for n = 1..10000</a> %p A162251 A[1]:= 2: P:= 2: %p A162251 for n from 2 to 100 do %p A162251 x:= convert(convert(P,base,10),`+`); %p A162251 if length(x) > 997 then break fi; %p A162251 A[n]:= x; %p A162251 P:= P*x; %p A162251 od: %p A162251 seq(A[i],i=1..100); # _Robert Israel_, Jan 16 2025 %Y A162251 Cf. A065075, A048572, A000012. %K A162251 base,nonn %O A162251 1,1 %A A162251 _Franklin T. Adams-Watters_, Jun 28 2009