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 A372348 #6 Jun 23 2024 16:12:55 %S A372348 1,1,2,7,40,329,3550,47755,777812,15048925,341018314,8946278015, %T A372348 268923178720,9176058440977,352386991982390,15115253160180019, %U A372348 719367763801641580,37767206102310829445,2176271214087106315042,137024328250953628940455,9388717924596833591237624 %N A372348 a(n) = Sum_{j=0..n} p(n - j, j) where p(n, x) = Sum_{k=0..n} k! * Lah(n, k) * x^k where Lah = A271703. %p A372348 Lah := (n, k) -> ifelse(n = k, 1, binomial(n-1, k-1)*n!/k!): %p A372348 p := n -> local k; add(k!*Lah(n, k)*x^k, k = 0..n): %p A372348 a := n -> local j; add(subs(x=j, p(n - j)), j = 0..n): %p A372348 seq((a(n)), n = 0..21); %Y A372348 Cf. A271703. %K A372348 nonn %O A372348 0,3 %A A372348 _Peter Luschny_, Apr 28 2024