A103348 Denominators of sum_{k=1..n} 1/k^7 = Zeta(7,n).

1, 128, 279936, 35831808, 2799360000000, 933120000000, 768464444160000000, 98363448852480000000, 645362587921121280000000, 645362587921121280000000, 12576291107821424895098880000000, 12576291107821424895098880000000

Offset: 1

Author

Wolfdieter Lang, Feb 15 2005

Keywords

• nonn
• frac
• easy

Comments

For the numerators, comments and a link reference see A103347.

Programs

Mathematica

s=0;lst={};Do[s+=n^1/n^8;AppendTo[lst,Denominator[s]],{n,3*4!}];lst (* Vladimir Joseph Stephan Orlovsky, Jan 24 2009 *)
Table[ HarmonicNumber[n, 7] // Denominator, {n, 1, 12}] (* Jean-François Alcover, Dec 04 2013 *)