%I #3 Mar 31 2012 10:22:05
%S 331776,1036800000,4031078400000,22583444889600000,
%T 185003580535603200000,2184855285409366671360000,
%U 36414254756822777856000000000,837793163263009313783808000000000
%N Coefficient of y^(n-4) in expansion of (y+n!)^n.
%t a = {}; Do[k = CoefficientList[Expand[(y + n!)^n], y]; AppendTo[a, k[[Length[k] - 4]]], {n, 4, 50}]; a
%Y Cf. A001563. A134358.
%K nonn
%O 4,1
%A _Artur Jasinski_, Oct 22 2007