login
A032921
Numbers whose set of base-14 digits is {1,3}.
1
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
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
KEYWORD
nonn,base
STATUS
approved