A215524 - OEIS

%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