A103350 Denominators of sum_{k=1..n} 1/k^8 = Zeta(8,n).
1, 256, 1679616, 429981696, 167961600000000, 167961600000000, 968265199641600000000, 247875891108249600000000, 1626313721561225625600000000, 1626313721561225625600000000
Offset: 1
Programs
-
Mathematica
s=0;lst={};Do[s+=n^1/n^9;AppendTo[lst,Denominator[s]],{n,3*4!}];lst (* Vladimir Joseph Stephan Orlovsky, Jan 24 2009 *) Table[ HarmonicNumber[n, 8] // Denominator, {n, 1, 10}] (* Jean-François Alcover, Dec 04 2013 *)
Comments