|
%I #9 Apr 12 2024 09:51:26
%S 0,2,20,22,200,202,220,222,288,298,498,2000,2002,2020,2022,2200,2202,
%T 2220,2880,2980,2998,4980,4998,20000,20002,20020,20022,20200,20220,
%U 20222,22000,22002,22020,22200,22202,28800,28998,29800,29980,29998,44998,48998,49800,49980,49998,89498,200000,200002,200020,200022,200200,200202,200220,200222
%N Numbers k such that k and k^2 use only the digits 0, 2, 4, 8 and 9.
%C Generated with DrScheme.
%H Jonathan Wellons, <a href="/A136909/b136909.txt">Table of n, a(n) for n = 1..1093</a>
%H J. Wellons, <a href="https://web.archive.org/web/20090206165028/http://jonathanwellons.com/shared-digits/">Tables of Shared Digits</a> [archived]
%e 92098040202^2 = 8482049009049208200804.
%t Module[{c={0,2,4,8,9},t},t=FromDigits/@Tuples[c,6];Select[t,SubsetQ[c, IntegerDigits[#^2]]&]] (* _Harvey P. Dale_, Nov 26 2014 *)
%K base,nonn,changed
%O 1,2
%A Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
|
