OFFSET
1,1
COMMENTS
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 1..1000
EXAMPLE
60480 is a term because 30240 divides 60480 and sigma(30240) = 120960 = 2*60480.
PROG
(Magma) [n: n in [1..100000] | #[d: d in Divisors(n) | SumOfDivisors(d) eq 2*n] gt 0]
(PARI) isok(n) = fordiv(n, d, if (sigma(d) == 2*n, return(1))); 0; \\ Michel Marcus, May 12 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, May 12 2019
EXTENSIONS
More terms from Jinyuan Wang, Jun 09 2019
STATUS
approved