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 A291626 #11 Sep 07 2019 08:24:41 %S A291626 1,4,9,11,12,13,14,19,21,29,31,34,35,36,37,38,39,41,42,43,44,46,54,56, %T A291626 59,61,69,72,79,81,89,91,96,106,107,108,109,111,112,113,114,115,116, %U A291626 117,118,119,121,122,123,124,125,126,127,128,129,131,132,133,134 %N A291626 Numbers k such that 1 is the smallest decimal digit of k^2. %H A291626 Harvey P. Dale, <a href="/A291626/b291626.txt">Table of n, a(n) for n = 1..1000</a> %e A291626 29 is in the sequence because 29^2 = 841, the smallest decimal digit of which is 1. %t A291626 Select[Range[200],Min[IntegerDigits[#^2]]==1&] (* _Harvey P. Dale_, Sep 07 2019 *) %o A291626 (PARI) select(k->vecmin(digits(k^2))==1, vector(1000, k, k)) %o A291626 (Python) %o A291626 A291626_list = [k for k in range(1,10**6) if min(str(k**2)) == '1'] # _Chai Wah Wu_, Aug 28 2017 %Y A291626 Cf. A291625, A291627, A291628, A291629, A291630, A291631. %K A291626 nonn,base %O A291626 1,2 %A A291626 _Colin Barker_, Aug 28 2017