|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
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
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|