|
| |
|
|
A095998
|
|
n! * (fractional part of n-th harmonic number).
|
|
0
| |
|
|
0, 1, 5, 2, 34, 324, 2988, 28944, 300816, 3371040, 793440, 49438080, 1121696640, 21930773760, 416139897600, 7965912729600, 156343306291200, 3169866941337600, 66629845591142400, 1454242012231680000
(list; graph; refs; listen; history; internal format)
|
|
|
|
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: A100080 A117734 A007572 * A099612 A142599 A068566
Adjacent sequences: A095995 A095996 A095997 * A095999 A096000 A096001
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 19 2004, based on a suggestion from Leroy Quet, Jun 18 2004
|
| |
|
|
