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

1, 512, 10077696, 5159780352, 10077696000000000, 373248000000000, 15061903105536000000000, 7711694390034432000000000, 4098310578334288576512000000000, 4098310578334288576512000000000

Offset

1,2

Comments

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

Links

Table of n, a(n) for n=1..10.

Mathematica

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

Crossrefs

Sequence in context: A330484 A283935 A016833 * A013848 A227607 A016881

Adjacent sequences: A103349 A103350 A103351 * A103353 A103354 A103355

Keyword

nonn,frac,easy

Author

Wolfdieter Lang, Feb 15 2005

Status

approved