OFFSET
1,1
COMMENTS
PROG
(PARI) t(n)=sigma(n)-n;
is(n)={local(a); a=t(n); a<>n && t(a)==n};
for(n=1, 1e6, if( n%2 == 0 && is(n), print1(n", "))) \\ Altug Alkan, Oct 16 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Omar E. Pol, Oct 02 2015
STATUS
approved