|
|
A164656
|
|
Numerators of partial sums of Theta(5) = sum( 1/(2*j-1)^5, j=1..infinity ).
|
|
4
|
|
|
1, 244, 762743, 12820180976, 3115356499043, 501734380891571068, 186290962962179367466549, 186291207179611798681792, 264507060005034822095008296869, 654945930087597102815813733559637156, 654946089730308117005814730177159031, 4215458332009996232497953858159263996273008
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
The denominators are given by A164657.
Rationals (partial sums) Theta(5,n) := sum(1/(2*j-1)^5,j=1..n) (in lowest terms). The limit of these rationals is Theta(5)= (1-1/2^5)*Zeta(5) approximately 1.004523763.., see A013663.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = numer(Theta(5,n))= numerator(sum(1/(2*j-1)^5,j=1..n)), n>=1.
Theta(5,n) = (-Psi(4, 1/2) + Psi(4, n+1/2))/(4!*2^5), n >= 1, with Psi(n,k) = Polygamma(n,k) is the n^th derivative of the digamma function. Psi(4, 1/2) = -4!*31*Zeta(5). - Jean-François Alcover, Dec 02 2013
|
|
EXAMPLE
|
Rationals Theta(5,n): [1, 244/243, 762743/759375, 12820180976/12762815625, 3115356499043/3101364196875,...].
|
|
MATHEMATICA
|
r[n_] := Sum[1/(2*j-1)^5, {j, 1, n}]; (* or r[n_] := (PolyGamma[4, n+1/2] - PolyGamma[4, 1/2])/768 // FullSimplify; *) Table[r[n] // Numerator, {n, 1, 12}] (* Jean-François Alcover, Dec 02 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,frac,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|