|
%I #11 Jun 20 2021 08:24:47
%S 5,10,16,20,21,26,27,28,35,65,67,79,84,103,104,105,111,114,125,129,
%T 130,131,135,136,137,156,158,162,168,177,178,206,208,215,262,263,324,
%U 385,388,425,427,456,458,466,468,469,473,474,475
%N Numbers whose base-5 and base-6 expansions have no digits in common.
%H Vincenzo Librandi, <a href="/A037358/b037358.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[500],Intersection[IntegerDigits[#,5],IntegerDigits[#,6]]=={}&] (* _Vincenzo Librandi_, Jun 08 2012 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
