OFFSET
1,1
COMMENTS
We observe that a(n) == 0 (mod 6) when n>=4.
EXAMPLE
a(3) = 40: divisors are {1,2,4,5,8,10,20,40}, mod prime(3)=5 this gives {0,1,2,3,4}.
MAPLE
a:= proc(n) option remember; local m, p; p:= ithprime(n); for m from p by p
while nops(map(d-> d mod p, numtheory[divisors](m)))<p do od; m
end:
seq(a(n), n=1..20); # Alois P. Heinz, Nov 21 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Nov 21 2024
EXTENSIONS
a(16)-a(33) from Alois P. Heinz, Nov 21 2024
STATUS
approved