login
A004980
Numbers k such that if 1 <= j < k then the fractional part of the k-th partial sum of the harmonic series > the fractional part of the j-th partial sum of the harmonic series.
0
2, 3, 10, 29, 30, 225, 226, 4549, 91379, 248395, 248396, 675212, 675213, 4989190, 13562026, 36865410, 36865411, 100210578, 100210579, 100210580, 5471312309, 14872568829, 14872568830, 40427833594, 40427833595, 109894245427, 109894245428, 812014744421
OFFSET
1,1
PROG
(PARI) lista(nn) = {fr = 0; h = 1; for (n = 2, nn, h += 1/n; if ((nfr = frac(h)) > fr, print1(n, ", "); fr = nfr; ); ); } \\ Michel Marcus, Sep 30 2013
CROSSREFS
Sequence in context: A037169 A058953 A160909 * A034324 A084380 A363139
KEYWORD
nonn
EXTENSIONS
a(9) from Michel Marcus, Sep 30 2013
More terms from Jon E. Schoenfield, Dec 23 2013
STATUS
approved