A032921 Numbers whose set of base-14 digits is {1,3}.

1, 3, 15, 17, 43, 45, 211, 213, 239, 241, 603, 605, 631, 633, 2955, 2957, 2983, 2985, 3347, 3349, 3375, 3377, 8443, 8445, 8471, 8473, 8835, 8837, 8863, 8865, 41371, 41373, 41399, 41401, 41763, 41765, 41791, 41793, 46859, 46861

Offset

1,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

Flatten[Table[FromDigits[#, 14]&/@Tuples[{1, 3}, n], {n, 5}]] (* Vincenzo Librandi, Jun 03 2012 *)

Prog

(Magma) [n: n in [1..47000] | Set(IntegerToSequence(n, 14)) subset {1, 3}]; // Vincenzo Librandi, Jun 03 2012
(Python)
def A032921(n): return (int(bin(m:=n+1)[3:], 14)<<1) + (14**(m.bit_length()-1)-1)//13 # Chai Wah Wu, Oct 13 2023

Crossrefs

Sequence in context: A323033 A365371 A080705 * A163785 A080793 A077225

Adjacent sequences: A032918 A032919 A032920 * A032922 A032923 A032924

Keyword

nonn,base

Author

Clark Kimberling

Status

approved