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 A343741 #17 Jul 20 2021 03:39:59
%S A343741 19,23,37,39,45,52,58,69,110,118,132,133,136,139,143,152,158,164,169,
%T A343741 173,174,187,195,204,215,217
%N A343741 Record high values in A343740.
%t A343741 Rest@ Union@ FoldList[Max, Table[If[IntegerQ@ Sqrt@ n, -1, Function[s, Max@ Array[FirstPosition[s, #][[1]] &, 10, 0]]@ RealDigits[Sqrt[n], 10, 300][[1]]], {n, 10^5}]] (* _Michael De Vlieger_, Jul 06 2021 *)
%Y A343741 Cf. A343739, A343740, A343742.
%K A343741 nonn,base,hard,more
%O A343741 1,1
%A A343741 _Jon E. Schoenfield_, Jul 05 2021
%E A343741 a(24)-a(26) from _Chai Wah Wu_, Jul 06 2021