%I #13 Apr 12 2024 09:51:27
%S 0,8,64,80,98,640,664,800,898,980,998,6400,6640,6664,8000,8980,8998,
%T 9800,9980,9998,64000,66400,66640,66664,80000,89800,89980,89998,98000,
%U 98998,99800,99980,99998,640000,664000,664064,666400,666640,666664,684908,800000,806008,896886,898000,899800,899980,899998,980000,989980,989998,990408,998000
%N Numbers k such that k and k^2 use only the digits 0, 4, 6, 8 and 9.
%C Generated with DrScheme.
%H Jonathan Wellons, <a href="/A136956/b136956.txt">Table of n, a(n) for n = 1..1208</a>
%H J. Wellons, <a href="https://web.archive.org/web/20090206165028/http://jonathanwellons.com/shared-digits/">Tables of Shared Digits</a> [archived]
%e 984686089068008^2 = 969606694004048984086049088064.
%t With[{c={0,4,6,8,9}},Select[FromDigits/@Tuples[c,6],SubsetQ[ c, IntegerDigits[ #^2]]&]] (* _Harvey P. Dale_, Feb 04 2015 *)
%Y Essentially the same as A107626. - _R. J. Mathar_, Feb 28 2009
%K base,nonn
%O 1,2
%A Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008