OFFSET
1,2
EXAMPLE
With k = 18, b = 10010, and x = concat(16,0,0,2,0) = 160020, we find that 160020 / 18 = 8890, so 18 is in this sequence.
PROG
(Python)
k = 1000
seq = []
for i in range(1, k+1):
b = bin(i)[2:]
c = len(b)
x = ""
for j in range(c):
x += str(int(pow(2, c-j-1)) * int(b[j]))
y = float(int(x))/float(i)
if y.is_integer():
seq.append(i)
print(seq)
(PARI) isok(n) = {my(b = binary(n)); s = ""; forstep (k=#b, 1, -1, s = concat(s, Str(b[#b-k+1]*2^(k-1)))); eval(s) % n == 0; } \\ Michel Marcus, Apr 26 2018
CROSSREFS
KEYWORD
nonn,base
AUTHOR
J. Stauduhar, Apr 24 2018
EXTENSIONS
Edited by N. J. A. Sloane, Apr 26 2018
STATUS
approved