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 A352683 #8 Mar 31 2022 10:16:27 %S A352683 1,4,5,14,42,145,566,2446,11547,58980,323458,1892559,11751904, %T A352683 77101510,532426225,3857129474,29229557534,231113610537,1902340920682, %U A352683 16267763481746,144260854186939,1324431903156744,12569419869410886,123141802554934015,1243798055506236156 %N A352683 a(n) = A352682(4, n). %F A352683 a(n) = 3*Gould(n - 1) + Bell(n) for n >= 1. %F A352683 a(n) = Sum_{k=1..n} binomial(n-1, k-1)*a(n-k) for n >= 2. %o A352683 (Julia) %o A352683 function A352683List(len) %o A352683 a = 4; P = BigInt[1]; T = BigInt[1] %o A352683 for n in 1:len-1 %o A352683 T = vcat(T, a) %o A352683 P = cumsum(vcat(a, P)) %o A352683 a = P[end] %o A352683 end %o A352683 T end %o A352683 A352683List(25) |> println %Y A352683 Cf. A352682, A000110 (Bell), A040027 (Gould). %K A352683 nonn %O A352683 0,2 %A A352683 _Peter Luschny_, Mar 30 2022