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 A341056 #22 Feb 14 2021 08:29:52 %S A341056 1,2,9,106,2801,132426,9705577,1015001954,143392421601,26298332570386, %T A341056 6074043257989001,1724846814877790682,590605908915568818769, %U A341056 239956225437223244619866,114123836188192016600789481,62808518765936960824453590226,39603421893790601518269204039617 %N A341056 a(n) = n! * [x^n] exp(x/(1 - n*x)) / (1 - x). %F A341056 a(n) = n! * Sum_{k=0..n} A341033(k,n)/k! = n! * (1 + Sum_{j=1.. n} Sum_{k=1.. j} n^(j-k) * binomial(j-1,k-1)/k!). %F A341056 a(n) ~ BesselI(1,2) * n! * n^(n-1). - _Vaclav Kotesovec_, Feb 14 2021 %e A341056 a(3) = 3! * (1 + 1/1! + 7/2! + 73/3!) = 106. %t A341056 Table[n!*(1 + Sum[Sum[n^(j-k)*Binomial[j-1, k-1]/k!, {k, 1, j}], {j, 1, n}]), {n, 0, 20}] (* _Vaclav Kotesovec_, Feb 14 2021 *) %o A341056 (PARI) {a(n) = n!*(1+sum(j=1, n, sum(k=1, j, n^(j-k)*binomial(j-1, k-1)/k!)))} %Y A341056 Cf. A277373, A293146, A330260, A331658, A341033. %K A341056 nonn %O A341056 0,2 %A A341056 _Seiichi Manyama_, Feb 04 2021