OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
Max Alekseyev, PARI/GP Scripts for Miscellaneous Math Problems (invphi.gp).
EXAMPLE
8 is in the sequence because sigma(7) = 8 and it is an even number.
PROG
(Magma) Set(Sort([SumOfDivisors(n): n in[1..1000] | not IsOdd(SumOfDivisors(n)) and SumOfDivisors(n) le 1000]));
(PARI) is(k) = !(k % 2) && invsigmaNum(k) > 0; \\ Amiram Eldar, Dec 26 2024, using Max Alekseyev's invphi.gp
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Aug 04 2016
STATUS
approved