|
Search: id:A102928
|
|
|
| A102928 |
|
Reduced numerators of the harmonic means of the first n positive integers. |
|
+0
1
|
|
| 1, 4, 18, 48, 300, 120, 980, 2240, 22680, 25200, 304920, 332640, 4684680, 5045040, 5405400, 11531520, 208288080, 73513440, 1474352880, 62078016, 108636528, 113809696, 2736605872, 8566766208, 223092870000, 232016584800
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Harmonic Mean
|
|
FORMULA
|
a(n)=Denominator[EulerGamma/n + PolyGamma[0, 1 + n]/n] [From Artur Jasinski (grafix(AT)csl.pl), Nov 02 2008]
|
|
EXAMPLE
|
1, 4/3, 18/11, 48/25, 300/137, 120/49, 980/363, 2240/761, ...
|
|
MATHEMATICA
|
Table[Denominator[Expand[EulerGamma/a + PolyGamma[0, 1 + a]/a]], {a, 1, 30}] [From Artur Jasinski (grafix(AT)csl.pl), Nov 02 2008]
|
|
CROSSREFS
|
Cf. A001008.
Sequence in context: A027271 A073991 A052642 this_sequence A081528 A056147 A120656
Adjacent sequences: A102925 A102926 A102927 this_sequence A102929 A102930 A102931
|
|
KEYWORD
|
nonn,frac
|
|
AUTHOR
|
Eric Weisstein (eric(AT)weisstein.com), Jan 19, 2005
|
|
|
Search completed in 0.002 seconds
|
