A137006 Numbers k such that k and k^2 use only the digits 1, 2, 5, 6 and 9.
1, 5, 11, 15, 16, 25, 96, 125, 161, 511, 515, 516, 1119, 1125, 1515, 1619, 2261, 5125, 9619, 9961, 12296, 12511, 12515, 16215, 16296, 22619, 22925, 25525, 25596, 51211, 96211, 112515, 125125, 126211, 126969, 129215, 161125, 161219, 226961, 256169, 262925, 511969, 516296, 956619, 959961, 1119219, 1121125, 1126925, 1252965, 1261965, 1262125
Offset: 1
Examples
126961261519525^2 = 16119161926629219511956225625.
Links
- Jonathan Wellons, Table of n, a(n) for n = 1..420
- J. Wellons, Tables of Shared Digits [archived]
Programs
-
Mathematica
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 *)
Comments