|
%I #9 Apr 12 2024 09:51:26
%S 0,2,20,64,200,264,492,640,964,2000,2064,2640,4902,4920,4992,6400,
%T 9640,20000,20602,20640,20992,24992,26400,49020,49200,49902,49920,
%U 49992,64000,96400,200000,206020,206400,209920,209992,222402,246962,249920,249992,264000,490200,492000,494262,494462,494662,499002,499020,499200,499902,499920,499992
%N Numbers k such that k and k^2 use only the digits 0, 2, 4, 6 and 9.
%C Generated with DrScheme.
%H Jonathan Wellons, <a href="/A136905/b136905.txt">Table of n, a(n) for n = 1..1278</a>
%H J. Wellons, <a href="https://web.archive.org/web/20090206165028/http://jonathanwellons.com/shared-digits/">Tables of Shared Digits</a> [archived]
%e 49642929029462^2 = 2464420402624200949264009444.
%t With[{c={0,2,4,6,9}},Select[FromDigits/@Tuples[c,6],SubsetQ[ c, IntegerDigits[ #^2]]&]] (* _Harvey P. Dale_, Sep 21 2017 *)
%K base,nonn
%O 1,2
%A Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
|
