%I #6 Apr 09 2015 09:45:54
%S 1,1,3,28,518,15446,669422,39529008,3040944216,294858211992,
%T 35128012184232,5038597437006816,855820352688929520,
%U 169777212251996740080,38880302912575002130800,10176193922326946712143616,3017694882032205124404127104
%N a(n) = sum(stirling1(n,k)^2*k!, k=0..n).
%H Alois P. Heinz, <a href="/A192559/b192559.txt">Table of n, a(n) for n = 0..250</a>
%t Table[Sum[StirlingS1[n,k]^2k!,{k,0,n}],{n,0,100}]
%o (Maxima) makelist(sum(stirling1(n,k)^2*k!,k,0,n),n,0,24);
%K nonn
%O 0,3
%A _Emanuele Munarini_, Jul 04 2011
|