|
%I #13 Jun 20 2021 02:28:32
%S 3,10,15,40,63,80,255,766,1002,1003,1023,3006,3007,4095,16383,60138,
%T 60139,60142,61354,65535,180154,245674,245754,245755,245758,256698,
%U 256699,256702,256942,256959,262143,715503,768699,768702,768703
%N Numbers whose base-3 and base-4 expansions have no digits in common.
%H Vincenzo Librandi, <a href="/A037345/b037345.txt">Table of n, a(n) for n = 1..54</a>
%t Select[Range[800000],Intersection[IntegerDigits[#,3],IntegerDigits[#,4]]=={}&] (* _Vincenzo Librandi_, Jun 07 2012 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
