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 A137006 #11 Apr 12 2024 09:51:27 %S A137006 1,5,11,15,16,25,96,125,161,511,515,516,1119,1125,1515,1619,2261,5125, %T A137006 9619,9961,12296,12511,12515,16215,16296,22619,22925,25525,25596, %U A137006 51211,96211,112515,125125,126211,126969,129215,161125,161219,226961,256169,262925,511969,516296,956619,959961,1119219,1121125,1126925,1252965,1261965,1262125 %N A137006 Numbers k such that k and k^2 use only the digits 1, 2, 5, 6 and 9. %C A137006 Generated with DrScheme. %H A137006 Jonathan Wellons, <a href="/A137006/b137006.txt">Table of n, a(n) for n = 1..420</a> %H A137006 J. Wellons, <a href="https://web.archive.org/web/20090206165028/http://jonathanwellons.com/shared-digits/">Tables of Shared Digits</a> [archived] %e A137006 126961261519525^2 = 16119161926629219511956225625. %t A137006 With[{c={1,2,5,6,9}},Flatten[Table[FromDigits/@Select[ Tuples[c,n], SubsetQ[ c,IntegerDigits[FromDigits[#]^2]]&],{n,7}]]] (* _Harvey P. Dale_, Nov 25 2014 *) %K A137006 base,nonn %O A137006 1,2 %A A137006 Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008