|
%I #8 Jul 05 2021 04:55:18
%S 0,3,6,30,60,63,300,306,600,603,630,3000,3006,3060,6000,6003,6030,
%T 6300,26323,30000,30006,30060,30600,60000,60003,60030,60300,63000,
%U 263230,263323,300000,300006,300060,300600,306000,600000,600003,600030,600300,603000,630000,2632300,2633230,3000000,3000006,3000060,3000600,3006000,3060000,6000000
%N Numbers k such that k and k^2 use only the digits 0, 2, 3, 6 and 9.
%C Generated with DrScheme.
%H Jonathan Wellons, <a href="/A136894/b136894.txt">Table of n, a(n) for n = 1..688</a>
%H J. Wellons, <a href="http://jonathanwellons.com/shared-digits/">Tables of Shared Digits</a>
%e 962309393939236^2 = 926039369663699699969660263696.
%t With[{c={0,2,3,6,9}},Select[FromDigits/@Tuples[c,7],SubsetQ[c, IntegerDigits[ #^2]]&]] (* _Harvey P. Dale_, Nov 22 2019 *)
%K base,nonn
%O 1,2
%A Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
|
