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 A353224 #16 May 04 2022 05:05:47 %S A353224 1,0,0,6,0,0,360,2520,0,60480,1814400,13305600,19958400,1556755200, %T A353224 39956716800,337815878400,1743565824000,103742166528000, %U A353224 2676547896422400,26863293006950400,287217598187520000,15976056520359936000,432428057769996288000 %N A353224 Expansion of e.g.f. (1 - x^4)^(-1/x). %F A353224 a(0) = 1; a(n) = (n-1)! * Sum_{k=1..floor((n+1)/4)} (4*k-1)/k * a(n-4*k+1)/(n-4*k+1)!. %F A353224 a(n) ~ sqrt(2*Pi) * n^(n + 1/2) / (4*exp(n)). - _Vaclav Kotesovec_, May 04 2022 %o A353224 (PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace((1-x^4)^(-1/x))) %o A353224 (PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace(exp(-log(1-x^4)/x))) %o A353224 (PARI) a_vector(n) = my(v=vector(n+1)); v[1]=1; for(i=1, n, v[i+1]=(i-1)!*sum(j=1, (i+1)\4, (4*j-1)/j*v[i-4*j+2]/(i-4*j+1)!)); v; %Y A353224 Cf. A121452, A353222. %Y A353224 Cf. A353225. %K A353224 nonn %O A353224 0,4 %A A353224 _Seiichi Manyama_, May 01 2022