Search: id:A109780 Results 1-1 of 1 results found. %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, Home Page (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 Search completed in 0.001 seconds