OFFSET
1,2
COMMENTS
FORMULA
a(n)=numerator(sum_{k=1..n} 1/k^8).
G.f. for rationals Zeta(8, n): polylogarithm(8, x)/(1-x).
MATHEMATICA
s=0; lst={}; Do[s+=n^1/n^9; AppendTo[lst, Numerator[s]], {n, 3*4!}]; lst (* Vladimir Joseph Stephan Orlovsky, Jan 24 2009 *)
Table[ HarmonicNumber[n, 8] // Numerator, {n, 1, 10}] (* Jean-François Alcover, Dec 04 2013 *)
Accumulate[1/Range[10]^8]//Numerator (* Harvey P. Dale, Aug 11 2024 *)
CROSSREFS
KEYWORD
nonn,frac,easy
AUTHOR
Wolfdieter Lang, Feb 15 2005
STATUS
approved