login
A287636
Indices of records in A100695.
2
1, 2, 4, 6, 10, 15, 16, 22, 30, 66, 70, 103, 210, 261, 1118, 1625, 2815, 3081, 3088, 6693, 18390, 18762, 32697, 59860, 71355, 155165, 198033, 208790, 262546, 266403, 673708, 697924, 699690, 760750, 1081782, 2993838, 4449916, 4672993, 4692381, 5547049, 6068616
OFFSET
1,2
COMMENTS
The corresponding denominators are 2, 6, 20, 42, 231, 240, 32640, 34362, 633759288, 1532037276, 4716994695, 100039636784966424, ... The denominator that corresponds to a(45) has 878175 digits.
LINKS
MATHEMATICA
a={}; dmax=0; n=1; While[Length[a]<40, denom=0; k=n/(n+1); While[ k>0, denom=Ceiling[1/k]; k=k-1/denom]; If[denom>dmax, dmax=denom; a=AppendTo[a, n]]; n++]; a
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, May 28 2017
STATUS
approved