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 A064621 #31 Dec 30 2019 12:12:40 %S A064621 1,3,6,13,20,62,113,224,367,494,833,9169,131313,155719,180118, %T A064621 280766754,3454917187,31685027464,152431947617,629621648241 %N A064621 Values of A005132(n) at which the ratio A005132(n)/n sets a new record. %C A064621 See A064622 for associated values of n. %C A064621 No other terms < 4 * 10^12. - _Jud McCranie_, Dec 29 2019 %H A064621 <a href="/index/Rea#Recaman">Index entries for sequences related to Recamán's sequence</a> %e A064621 A005132(7)=20, 20/7 = 2.857..., larger than the ratio for any smaller value of n. %t A064621 Block[{s = Nest[Append[#1, If[And[#3 > 0, FreeQ[#1, #3]], #3, #1[[-1]] + #2]] & @@ {#1, #2, #1[[-1]] - #2} & @@ {#, Length@ #} &, {0}, 200000], t}, t = MapIndexed[#1/First@ #2 &, s]; Rest@ Map[s[[FirstPosition[t, #][[1]] ]] &, Union@ FoldList[Max, t]] ] (* _Michael De Vlieger_, Dec 29 2019 *) %Y A064621 Cf. A005132, A064622. %K A064621 more,nonn %O A064621 1,2 %A A064621 _Jud McCranie_, Sep 26 2001 %E A064621 Offset changed, a(19)-a(20) from _Jud McCranie_, Dec 28 2019