%I A109780
%S A109780 1,5,32,310,4924,126648,4869192,258608880,17973530784,1576566817920,
%T A109780 170028329630400,22092970356011520,3402396234446595840,
%U A109780 612619882946124157440,127484451712085785228800,30358069092698014483200000
%N A109780 n! sum{k=1 to n} H(k) (n-k)!, where H(k) = sum{j=1 to k} 1/j.
%H A109780 Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a> 
               (listed in lieu of email address)
%F A109780 E.g.f.: hypergeom([1, 1], [], x)*ln(1-x)/(x-1). - Vladeta Jovovic (vladeta(AT)eunet.rs), 
               Aug 16 2005
%t A109780 f[n_] := n! * Sum[(n-k)! * Sum[1/j, {j, 1, k}], {k, 1, n}]; Table[f[n], 
               {n, 1, 30}] (Propper)
%Y A109780 Sequence in context: A023880 A104031 A023882 this_sequence A093448 A094653 
               A135250
%Y A109780 Adjacent sequences: A109777 A109778 A109779 this_sequence A109781 A109782 
               A109783
%K A109780 nonn
%O A109780 1,2
%A A109780 Leroy Quet Aug 13 2005
%E A109780 More terms from Ryan Propper (rpropper(AT)stanford.edu), Aug 18 2005