|
%I #5 Dec 16 2016 14:51:31
%S 1,1,1025,62122,4436645,635999636,70891240117,9361749284896,
%T 1491531423411913,235989968039151760,40944833826904310921,
%U 7754112338325635303264,1525672210381158739381165,318496972975593582426074560,70389888724665631249754800189
%N Exponential transform of the tenth powers A008454.
%H Alois P. Heinz, <a href="/A279643/b279643.txt">Table of n, a(n) for n = 0..332</a>
%F E.g.f.: exp(exp(x)*(x^10+45*x^9+750*x^8+5880*x^7+22827*x^6+42525*x^5 +34105*x^4 +9330*x^3 +511*x^2+x)).
%p a:= proc(n) option remember; `if`(n=0, 1,
%p add(binomial(n-1, j-1)*j^10*a(n-j), j=1..n))
%p end:
%p seq(a(n), n=0..25);
%Y Column k=10 of A279636.
%Y Cf. A008454.
%K nonn
%O 0,3
%A _Alois P. Heinz_, Dec 16 2016
|
