A101632 Denominator of partial sums of a certain series.

1, 33, 924, 17556, 1141140, 1025884860, 17440042620, 715041747420, 16445960190660, 115121721334620, 345365164003860, 1242969225249892140, 382452069307659120, 27154096920843797520, 1004701586071220508240

Offset: 1

Author

Wolfdieter Lang, Dec 23 2004

Keywords

• nonn
• frac
• easy

Comments

The numerators are given in A101631.

Programs

Mathematica

Denominator[24*Accumulate[Table[1/((5k-1)k(5k+1)),{k,15}]]] (* Harvey P. Dale, May 29 2014 *)

Formula

a(n)=denominator(s(n)) with s(n)=24*sum(1/((5*k-1)*k*(5*k+1)), k=1..n).