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 A373856 #14 Jun 19 2024 09:28:04 %S A373856 0,1,17,1652,474770,301474214,357901156354,712632435944568, %T A373856 2204970751341231816,10017874331177386762512, %U A373856 63973486554110386836270096,554598491512901862814742673168,6344773703149123365957506715989568,93563015826037060521986513216617599504 %N A373856 a(n) = Sum_{k=1..n} k! * k^(2*n-1) * |Stirling1(n,k)|. %F A373856 E.g.f.: Sum_{k>=1} (-log(1 - k^2*x))^k / k. %t A373856 nmax=13; Range[0,nmax]!CoefficientList[Series[Sum[(-Log[1 - k^2*x])^k / k,{k,nmax}],{x,0,nmax}],x] (* _Stefano Spezia_, Jun 19 2024 *) %o A373856 (PARI) a(n) = sum(k=1, n, k!*k^(2*n-1)*abs(stirling(n, k, 1))); %Y A373856 Cf. A003713, A373855. %Y A373856 Cf. A220179, A242228, A373858. %Y A373856 Cf. A351136, A373861. %K A373856 nonn %O A373856 0,3 %A A373856 _Seiichi Manyama_, Jun 19 2024