login
A095998
n! * (fractional part of n-th harmonic number).
2
0, 1, 5, 2, 34, 324, 2988, 28944, 300816, 3371040, 793440, 49438080, 1121696640, 21930773760, 416139897600, 7965912729600, 156343306291200, 3169866941337600, 66629845591142400, 1454242012231680000
OFFSET
1,3
FORMULA
a(n) = n! * fractional part ( harmonic number (n)).
a(n) also equals n!*(sum{k=1 to n} 1/k) (mod n!). - Leroy Quet, Mar 20 2008
MATHEMATICA
f[n_] := n!*FractionalPart[HarmonicNumber[n]]; Table[ f[n], {n, 22}]
CROSSREFS
Sequence in context: A360546 A347379 A224494 * A328555 A208927 A099612
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jul 19 2004, based on a suggestion from Leroy Quet, Jun 18 2004
STATUS
approved