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 A387519 #15 Sep 02 2025 12:30:32 %S A387519 1,3,4,6,7,12,19,32,58,77,145,208,237,321,369,480,838,1290,1533,3031, %T A387519 4003,4965,6900,7653,13365,18980,23022,28225,36034,54189,74152,82124, %U A387519 129792,274543,419570,730075,1679322,1844372,2469066 %N A387519 Indices of record high points in A386487. %C A387519 Needs a b-file! %t A387519 r = -1; s = Import["https://oeis.org/A386482/b386482.txt", "Data"][[All, -1]]; Reap[Do[If[# > r, r = #; Sow[n]] &[s[[n]] - n], {n, Length[s]}] ][[-1, 1]] (* _Michael De Vlieger_, Sep 01 2025 *) %Y A387519 Cf. A386482, A386487, A386488, A387520, A387521. %K A387519 nonn,more,new %O A387519 1,2 %A A387519 _N. J. A. Sloane_, Sep 01 2025. %E A387519 More terms from _Michael De Vlieger_, Sep 01 2025