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 A352684 #5 Mar 31 2022 10:16:32 %S A352684 1,1,3,11,42,176,808,4015,21423,122035,738424,4725200,31854056, %T A352684 225472729,1670849235,12929089547,104227219082,873524820380, %U A352684 7596906788456,68442869865191,637789899261963,6138617062823371,60945644655192264,623410514987315252,6562725963582441936 %N A352684 a(n) = A352682(n, n). %F A352684 a(n) = (n-1)*Gould(n-1) + Bell(n) for n >= 1. %o A352684 (Julia) %o A352684 function A352684(n) %o A352684 a = BigInt(n == 0 ? 1 : n) %o A352684 P = BigInt[1]; T = BigInt[1] %o A352684 for k in 1:n-1 %o A352684 T = push!(T, a) %o A352684 P = cumsum(pushfirst!(P, a)) %o A352684 a = P[end] %o A352684 end %o A352684 a end %o A352684 [A352684(n) for n in 0:24] |> println %Y A352684 Cf. A040027 (Gould), A000110 (Bell), A352682. %K A352684 nonn %O A352684 0,3 %A A352684 _Peter Luschny_, Mar 30 2022