|
%I #11 Sep 08 2022 08:44:51
%S 1,3,15,17,43,45,211,213,239,241,603,605,631,633,2955,2957,2983,2985,
%T 3347,3349,3375,3377,8443,8445,8471,8473,8835,8837,8863,8865,41371,
%U 41373,41399,41401,41763,41765,41791,41793,46859,46861
%N Numbers whose set of base-14 digits is {1,3}.
%H Vincenzo Librandi, <a href="/A032921/b032921.txt">Table of n, a(n) for n = 1..1000</a>
%t Flatten[Table[FromDigits[#,14]&/@Tuples[{1,3},n],{n,5}]] (* _Vincenzo Librandi_, Jun 03 2012 *)
%o (Magma) [n: n in [1..47000] | Set(IntegerToSequence(n, 14)) subset {1, 3}]; // _Vincenzo Librandi_, Jun 03 2012
%K nonn,base
%O 1,2
%A _Clark Kimberling_
|
