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 A174481 #2 Mar 30 2012 18:37:21 %S A174481 1,1,6,102,3400,187455,15441636,1776667928,272145104736, %T A174481 53540399628405,13156413372354340,3949011172491569316, %U A174481 1421739781364268435576,604701975767931070422939,299969585267917154906689660 %N A174481 a(n) = coefficient of x^n/(n-1)! in the (n-1)-th iteration of x*exp(x) for n>=1. %e A174481 The initial n-th iterations of x*exp(x) begin: %e A174481 n=0: (1)*x; %e A174481 n=1: x + (1)*x^2 + x^3/2! + x^4/3! + x^5/4! + x^6/5! +... %e A174481 n=2: x + 2*x^2 +(6)*x^3/2! + 23*x^4/3! + 104*x^5/4! + 537*x^6/5! +... %e A174481 n=3: x + 3*x^2 +15*x^3/2! +(102)*x^4/3! +861*x^5/4! +8598*x^6/5! +... %e A174481 n=4: x + 4*x^2 +28*x^3/2! +274*x^4/3! +(3400)*x^5/4! +50734*x^6/5! +... %e A174481 n=5: x + 5*x^2 +45*x^3/2! +575*x^4/3! +9425*x^5/4! +(187455)*x^6/5!+... %e A174481 n=6: x + 6*x^2 +66*x^3/2! +1041*x^4/3! +21216*x^5/4!+527631*x^6/5! + (15441636)*x^7/6! +... %e A174481 This sequence starts with the above coefficients in parathesis. %o A174481 (PARI) {a(n)=local(E=x*exp(x+x*O(x^n)), F=x); for(i=1, n-1, F=subst(F, x, E)); (n-1)!*polcoeff(F, n)} %Y A174481 Cf. A174480, A174482, A174483, A174484. %K A174481 nonn %O A174481 1,3 %A A174481 _Paul D. Hanna_, Apr 09 2010