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 A062120 #9 Jul 17 2021 04:30:17 %S A062120 1,2500,3600,62500,14379264,57760000,141376000000,245495475625, %T A062120 390625000000,943971582724,4482669527413081,8790937600000000, %U A062120 31561776563446336,10235319926865509025 %N A062120 Numbers k such that k has sqrt(k) as its middle digits. %F A062120 a(n) = A062118(n)^2. %t A062120 Do[ If[ StringPosition[ ToString[n^2], ToString[n]] [[1, 1]] == (Ceiling[ Log[10, n^2] ] - Ceiling[ Log[10, n] ])/2 + 1, Print[n^2] ], {n, 1, 10^9} ] %Y A062120 Cf. A062118. %K A062120 nonn,base %O A062120 1,2 %A A062120 Brian Wallace (wallacebrianedward(AT)yahoo.co.uk), Jun 28 2001