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 A354611 #11 Jul 09 2022 11:05:20 %S A354611 1,0,-2,-3,28,150,-714,-10920,13392,1129464,3694680,-150143400, %T A354611 -1515256104,22631946480,525582087408,-2756199995640,-192774443051520, %U A354611 -525316900812480,75951597634314048,926307802605928320,-30597152030347651200,-833744424171043728000 %N A354611 Expansion of e.g.f. 1/(2 - (1 - x)^x). %F A354611 a(0) = 1; a(n) = Sum_{k=1..n} A007114(k) * binomial(n,k) * a(n-k). %o A354611 (PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace(1/(2-(1-x)^x))) %o A354611 (PARI) a_vector(n) = my(v=vector(n+1)); v[1]=1; for(i=1, n, v[i+1]=sum(j=1, i, j!*sum(k=0, j\2, (-1)^(j-k)*stirling(j-k, k, 1)/(j-k)!)*binomial(i, j)*v[i-j+1])); v; %Y A354611 Cf. A007114, A354610. %K A354611 sign %O A354611 0,3 %A A354611 _Seiichi Manyama_, Jul 08 2022