|
|
A244959
|
|
Smallest positive multiple of n whose base 8 representation contains only 0's and 1's.
|
|
2
|
|
|
1, 8, 9, 8, 65, 72, 299593, 8, 9, 520, 4169, 72, 65, 2396744, 585, 64, 4097, 72, 513, 520, 17044041, 33352, 33281, 72, 266825, 520, 513, 2396744, 266249, 4680, 4681, 64, 32769, 32776, 16814665, 72, 262145, 4104, 585, 520, 32841, 136352328, 36937, 33352, 585
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Module[{nn=10, b8}, b8=Rest[FromDigits[#, 8]&/@Tuples[{0, 1}, nn]]; Table[SelectFirst[ b8, Mod[#, n]==0&], {n, 100}]] (* Harvey P. Dale, Feb 03 2024 *)
|
|
PROG
|
(Python)
....if n > 0:
........for i in range(1, 2**n):
............x = int(bin(i)[2:], 8)
............if not x % n:
................return x
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Data corrected, offset corrected, and b-file replaced by Harvey P. Dale, Feb 03 2024
|
|
STATUS
|
approved
|
|
|
|