OFFSET
1,2
COMMENTS
Sándor (2021) showed that all the Mersenne exponents (A000043) are in this sequence and conjectured that both this sequence and its complement are infinite.
LINKS
József Sándor, On Vandiver's arithmetical function - I, Notes on Number Theory and Discrete Mathematics, Vol. 27, No. 3 (2021), pp. 29-38.
MATHEMATICA
v[n_] := Times @@ (Divisors[n] + 1); Select[Range[150], v[2^# - 1] < v[2^# + 1] &]
PROG
(PARI) f(n) = my(d = divisors(n)); prod(i=1, #d, d[i]+1); \\ A020696
isok(k) = f(2^k-1) < f(2^k+1); \\ Michel Marcus, Jun 30 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Jun 29 2022
STATUS
approved