Search: id:A060944 Results 1-1 of 1 results found. %I A060944 %S A060944 1,9,130,2900,93576,4141872,241353792,17929776384,1655071418880, %T A060944 185914776960000,24978180045312000,3955930130221056000, %U A060944 729464836964806656000,154952762244805582848000 %N A060944 n!^2 * sum{k=1 to n} sum{j=1 to k}[1/j^2]. %C A060944 Sum of generalized harmonic numbers squared multiplied by (n!)^2. a(n) = Sum[HarmonicNumber[k, 2]], k = 1..n, where HarmonicNumber[k, 2] = Sum[1/k^2], k = 1..n. - Alexander Adamchuk (alex(AT)kolmogorov.com), Oct 27 2004 %H A060944 Harry J. Smith, Table of n, a(n) for n=1,...,100 %H A060944 Leroy Quet, Home Page (listed in lieu of email address) %H A060944 Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics. %F A060944 a(n) = (n!)^2 * Sum[(k+1)/(n-k)^2, {k, 0, n-1}], a(n) = (n!)^2 * Sum[HarmonicNumber[k, 2]], {k, 1, n}], HarmonicNumber[k, 2] = A007406(k) / A007407(k). - Alexander Adamchuk (alex(AT)kolmogorov.com), Oct 27 2004 %e A060944 a(3) = 6^2 *(1 + (1 + 1/2^2) + (1 + 1/2^2 + 1/3^2)) = 130 %t A060944 Table[(n!)^2*Sum[(k+1)/(n-k)^2, {k, 0, n-1}], {n, 1, 10}] %o A060944 (PARI) { default(realprecision, 100); for (n=1, 100, write("b060944.txt", n, " ", n!^2 * sum(k=1, n, sum(j=1, k, 1/j^2))); ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jul 15 2009] %Y A060944 Cf. A001705, A007406, A007407. %Y A060944 Sequence in context: A046754 A064746 A075762 this_sequence A112123 A167253 A097999 %Y A060944 Adjacent sequences: A060941 A060942 A060943 this_sequence A060945 A060946 A060947 %K A060944 easy,nonn %O A060944 1,2 %A A060944 Leroy Quet May 07 2001 Search completed in 0.001 seconds