login
Numbers whose base-5 and base-7 expansions have no digits in common.
1

%I #11 Jun 20 2021 08:29:27

%S 5,6,10,12,13,15,16,18,19,20,21,22,24,25,26,27,30,31,32,33,40,41,42,

%T 44,45,47,48,60,62,78,85,88,89,90,92,93,97,98,99,118,120,121,124,125,

%U 128,130,131,145,146,170,171,174,180,181,182,185

%N Numbers whose base-5 and base-7 expansions have no digits in common.

%H Vincenzo Librandi, <a href="/A037359/b037359.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Range[200],Intersection[IntegerDigits[#,5],IntegerDigits[#,7]]=={}&] (* _Vincenzo Librandi_, Jun 08 2012 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_