|
%I #12 Jan 19 2015 03:40:49
%S 1,1024,60466176,61917364224,604661760000000000,604661760000000000,
%T 170801981216778240000000000,174901228765980917760000000000,
%U 10327742657402407212810240000000000,413109706296096288512409600000000
%N Denominators of sum_{k=1..n} 1/k^10 = Zeta(10,n).
%C For the numerators, comments and a link reference see A103716.
%t s=0;lst={};Do[s+=n^1/n^11;AppendTo[lst,Denominator[s]],{n,3*4!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Jan 24 2009 *)
%t Table[ HarmonicNumber[n, 10] // Denominator, {n, 1, 10}] (* _Jean-François Alcover_, Dec 04 2013 *)
%K nonn,frac,easy
%O 1,2
%A _Wolfdieter Lang_, Feb 15 2005
|
