A158489 Numerator of Bernoulli(n, -1/7).
1, -9, 97, -36, -481, 300, 10471, -17004, -3572161, 1503900, 879402485, -204957852, -851608333333, 39666688620, 2959809513079, -10337889346380, -74944106556170657, 3489994294713660, 6362557475056509757, -1481439997178305788, -8686827386554851273011
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..250
Crossrefs
For denominators see A158475.
Programs
-
Mathematica
Table[Numerator[BernoulliB[n, -1/7]], {n, 0, 50}] (* Vincenzo Librandi, Mar 16 2014 *)