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 A045862 #24 Sep 29 2021 07:09:37 %S A045862 9,29,90,91,92,93,94,283,284,285,286,287,288,289,290,291,292,293,294, %T A045862 295,296,297,298,299,895,896,897,898,899,900,901,902,903,904,905,906, %U A045862 907,908,909,910,911,912,913,914,915,916,917,918,919,920,921,922,923 %N A045862 Numbers whose square has initial digit '8'. %H A045862 Seiichi Manyama, <a href="/A045862/b045862.txt">Table of n, a(n) for n = 1..10000</a> %t A045862 Select[Range[1000],Take[IntegerDigits[#^2],1]=={8}&] (* _Harvey P. Dale_, Jul 30 2019 *) %o A045862 (Python) %o A045862 from math import isqrt %o A045862 def auptorun(runs): %o A045862 alst = [] %o A045862 for n in range(1, runs+1): %o A045862 alst.extend(list(range(isqrt(8*10**n) + 1, isqrt(9*10**n - 1)+1))) %o A045862 return alst %o A045862 print(auptorun(5)) # _Michael S. Branicky_, Sep 29 2021 %o A045862 (PARI) isok(k) = digits(k^2)[1] == 8; \\ _Michel Marcus_, Sep 29 2021 %Y A045862 Cf. A045792, A035075. %K A045862 nonn,base %O A045862 1,1 %A A045862 _Jeff Burch_