This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A287636 #10 Oct 15 2023 05:13:01 %S A287636 1,2,4,6,10,15,16,22,30,66,70,103,210,261,1118,1625,2815,3081,3088, %T A287636 6693,18390,18762,32697,59860,71355,155165,198033,208790,262546, %U A287636 266403,673708,697924,699690,760750,1081782,2993838,4449916,4672993,4692381,5547049,6068616 %N A287636 Indices of records in A100695. %C A287636 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. %H A287636 Amiram Eldar, <a href="/A287636/b287636.txt">Table of n, a(n) for n = 1..57</a> %t A287636 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 %Y A287636 Cf. A100678, A100695, A228136. %K A287636 nonn %O A287636 1,2 %A A287636 _Amiram Eldar_, May 28 2017