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 A367486 #9 Nov 20 2023 11:54:51 %S A367486 1,0,4,18,168,1830,24540,388122,7084560,146650446,3395460900, %T A367486 86962122786,2441210321880,74542218945558,2459830123779756, %U A367486 87236196407090730,3308881779086345760,133667058288336876894,5729380391745420070068 %N A367486 Expansion of e.g.f. 1/(3 - 2*exp(x))^x. %F A367486 a(0) = 1; a(n) = Sum_{k=1..n} A367489(k) * binomial(n-1,k-1) * a(n-k). %o A367486 (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=1, j-1, 2^k*(k-1)!*stirling(j-1, k, 2))*binomial(i-1, j-1)*v[i-j+1])); v; %Y A367486 Cf. A004123, A367470, A367471. %Y A367486 Cf. A354413, A367488. %Y A367486 Cf. A367489. %K A367486 nonn %O A367486 0,3 %A A367486 _Seiichi Manyama_, Nov 19 2023