A136956 Numbers k such that k and k^2 use only the digits 0, 4, 6, 8 and 9.
0, 8, 64, 80, 98, 640, 664, 800, 898, 980, 998, 6400, 6640, 6664, 8000, 8980, 8998, 9800, 9980, 9998, 64000, 66400, 66640, 66664, 80000, 89800, 89980, 89998, 98000, 98998, 99800, 99980, 99998, 640000, 664000, 664064, 666400, 666640, 666664, 684908, 800000, 806008, 896886, 898000, 899800, 899980, 899998, 980000, 989980, 989998, 990408, 998000
Offset: 1
Examples
984686089068008^2 = 969606694004048984086049088064.
Links
- Jonathan Wellons, Table of n, a(n) for n = 1..1208
- J. Wellons, Tables of Shared Digits [archived]
Crossrefs
Essentially the same as A107626. - R. J. Mathar, Feb 28 2009
Programs
-
Mathematica
With[{c={0,4,6,8,9}},Select[FromDigits/@Tuples[c,6],SubsetQ[ c, IntegerDigits[ #^2]]&]] (* Harvey P. Dale, Feb 04 2015 *)
Comments