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 A343719 #32 Dec 28 2022 01:57:32 %S A343719 0,2,6,7,8,10,13,15,19,24,34,38,45,74,93,97,122,228,478,547,556,621, %T A343719 745,916,1057,1090,1188,1318,1467,1821,2073,2601 %N A343719 Indices at which record values occur in A343717. %H A343719 Lucas A. Brown, <a href="https://github.com/lucasaugustus/oeis/blob/main/A343717%2B8%2B9.py">Python program</a>. %t A343719 With[{s = Array[Block[{m = #!, k = 0}, While[! PrimeQ[10^If[k == 0, 1, IntegerLength[k]]*m + k], k++]; k] &, 250] }, Map[FirstPosition[s, #][[1]] &, Union@ FoldList[Max, s]] ] (* _Michael De Vlieger_, May 17 2021 *) %o A343719 (Python) # see linked program in A343717 %Y A343719 Cf. A343717, A343718. %K A343719 nonn,base,more,hard %O A343719 1,2 %A A343719 _Jon E. Schoenfield_, May 17 2021 %E A343719 a(20)-a(23) from _Michael S. Branicky_, May 18 2021 %E A343719 a(24) from _Michael S. Branicky_, May 19 2021 %E A343719 a(25)-a(31) from _Chai Wah Wu_, May 25 2021 %E A343719 a(32) from _Lucas A. Brown_, Dec 27 2022