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 A316191 #7 Jun 26 2018 14:18:59 %S A316191 1,11,37,89,211,1344,1345,1346,2503,3967,15704,15705,16033,19634, %T A316191 19635,24281,31428,31429,31430,31431,31432,31433,38501,58831,155964, %U A316191 203713,206699 %N A316191 List of indices where the maximum of {A316190(j) | j<=n} increases. %e A316191 a(3) = 37 because A316190(37) = 4 > 2 = max{A316190(n) : 1 <= n < 37}. %p A316191 A316191_list := proc(N) local R,a,A,n,mx; R := NULL; %p A316191 A := A316190_list(N); n := 1; mx := 0; %p A316191 for a in A do %p A316191 if a > mx then mx := a; R := R,n fi; %p A316191 n := n + 1; %p A316191 od; [R] end: %p A316191 A316191_list(10000); %Y A316191 Cf. A002540, A316190. %K A316191 nonn %O A316191 1,2 %A A316191 _Peter Luschny_, Jun 26 2018