|
%I #29 Feb 07 2021 11:31:22
%S 1,1,4,12,52,240,1188,6804,38960,253296,1654560,11816640,85816608,
%T 668005728,5240582592,44667645120,365989405440,3494595006720,
%U 28075694694912,325862541872640,2101211758356480,39605981661066240,48568198208302080,7549838510211486720,-66667098077331572736
%N n-th derivative of (x^x)^x at x=1.
%H Alois P. Heinz, <a href="/A215524/b215524.txt">Table of n, a(n) for n = 0..400</a>
%F E.g.f.: ((x+1)^(x+1))^(x+1).
%p a:= n-> n!*coeff(series(subs(x=x+1, (x^x)^x ), x, n+1), x, n):
%p seq(a(n), n=0..30);
%t m = 24; CoefficientList[((x+1)^(x+1))^(x+1) + O[x]^(m+1), x]*Range[0, m]! (* _Jean-François Alcover_, Feb 07 2021 *)
%Y Column k=3 of A215703.
%Y Cf. A005727, A179230, A179405, A215522.
%K sign
%O 0,3
%A _Alois P. Heinz_, Aug 14 2012
|
