%I #4 Dec 16 2016 10:07:46
%S 1,1,17,130,1445,19676,288517,4768240,86825545,1707427792,36133006121,
%T 817372392464,19631012216653,498360729728512,13320962518548973,
%U 373554936371438896,10956734043885307793,335251566923262901760,10675684185273726205393,353052079426340899698736
%N Exponential transform of the fourth powers A000583.
%H Alois P. Heinz, <a href="/A279637/b279637.txt">Table of n, a(n) for n = 0..452</a>
%F E.g.f.: exp(exp(x)*(x^4+6*x^3+7*x^2+x)).
%p a:= proc(n) option remember; `if`(n=0, 1,
%p add(binomial(n-1, j-1)*j^4*a(n-j), j=1..n))
%p end:
%p seq(a(n), n=0..25);
%Y Column k=4 of A279636.
%Y Cf. A000583.
%K nonn
%O 0,3
%A _Alois P. Heinz_, Dec 16 2016
|