OFFSET
1,1
COMMENTS
Numbers m such that tau(m) = tau(m + 1)/2 = tau(m + 2)/4 = tau(m + 3)/8 = tau(m + 4)/16, where tau(k) = the number of divisors of k (A000005).
Quintuples of [tau(a(n)), tau(a(n) + 1), tau(a(n) + 2), tau(a(n) + 3), tau(a(n) + 4)] = [tau(a(n)), 2*tau(a(n)), 4*tau(a(n)), 8*tau(a(n)), 16*tau(a(n))]: [2, 4, 8, 16, 32], [2, 4, 8, 16, 32], [2, 4, 8, 16, 32], [2, 4, 8, 16, 32], [2, 4, 8, 16, 32], [2, 4, 8, 16, 32], ...
Corresponding values of numbers k: 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 4, 2, 4, 2, 2, 2, 2, 2, 2, 2, 2, 4, 2, 2, 4, 4, ...
Prime terms are in A100365; number 8485502 is the smallest composite term.
EXAMPLE
tau(1124581) = 2, tau(1124582) = 4, tau(1124583) = 8, tau(1124584) = 16, tau (1124585) = 32.
PROG
(Magma) [m: m in [1..10^7] | #Divisors(m) eq #Divisors(m + 1) / 2 and #Divisors(m) eq #Divisors(m + 2) / 4 and #Divisors(m) eq #Divisors(m + 3) / 8 and #Divisors(m) eq #Divisors(m + 4) / 16];
(PARI) isok(m) = vector(4, k, numdiv(m+k))/numdiv(m) == [2, 4, 8, 16]; \\ Michel Marcus, Jan 02 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Jan 01 2021
STATUS
approved
