|
Search: id:A124236
|
|
|
| A124236 |
|
a(n) = denominator of (sum{k=1 to n} H(2k)(2k)!/(k!(k+n+1)!) = sum{k=0 to n-1} H(n-k)(2k)!/ (k!(k+n+1)!)), where H(k) = sum{j=1 to k} 1/j (i.e. the k-th harmonic number). |
|
+0
2
|
|
| 2, 3, 144, 30240, 4725, 7983360, 108972864000, 8072064000, 453682944000, 403179783552000, 1250891123328000, 179527894020034560000, 42009527200688087040000, 9335450489041797120000
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
R. J. Mathar, Table of n, a(n) for n = 1..30
Leroy Quet, Home Page (listed in lieu of email address)
|
|
MATHEMATICA
|
f[n_] := Denominator[Sum[HarmonicNumber[2k]*Factorial[2k]/(Factorial[k]*Factorial[k + n + 1]), {k, n}]]; Table[f[n], {n, 16}] (*Chandler*)
|
|
PROGRAM
|
(PARI) H(n)={ if(n==0, 0, sum(k=1, n, 1/k)) ; }
(PARI) A124236(n)={ denominator(sum(k=1, n, H(2*k)*(2*k)!/k!/(k+n+1)!)) ; }
(PARI) A124236alt(n)={ denominator(sum(k=0, n-1, H(n-k)*(2*k)!/k!/(k+n+1)!)) ; } (Mathar)
|
|
CROSSREFS
|
Cf. A124235.
Sequence in context: A066908 A057738 A042073 this_sequence A042369 A042701 A106715
Adjacent sequences: A124233 A124234 A124235 this_sequence A124237 A124238 A124239
|
|
KEYWORD
|
frac,nonn
|
|
AUTHOR
|
Leroy Quet Oct 22 2006
|
|
EXTENSIONS
|
Extended by R. J. Mathar and Ray Chandler (rayjchandler(AT)sbcglobal.net), Oct 23 2006
|
|
|
Search completed in 0.002 seconds
|
