OFFSET
1,1
COMMENTS
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..20000
EXAMPLE
Number 5775 is the smallest abundant number k such that k+1 = 5576 is also abundant.
PROG
(Magma) [Min([m: m in[1..10^4] | SumOfDivisors(m) gt 2*m and SumOfDivisors(m+n) gt 2*(m+n)]): n in [1..60]];
(PARI) A329525(n) = for(k=1, oo, if((sigma(k) > (k+k)) && (sigma(n+k) > 2*(n+k)), return(k))); \\ Antti Karttunen, Nov 15 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Nov 15 2019
STATUS
approved
