OFFSET
1,1
COMMENTS
a(28) > 10^11. - Donovan Johnson, Aug 15 2011
FORMULA
Here s(k) = sigma(k) - k, t(k) = |s(k) - k|.
PROG
(PARI) l=vector(8, n, abs(sigma(n)-2*n)-sigma(n)+n); l[8]=0; sc=sum(n=1, 8, l[n]); for(n=8, 1000000, m=sigma(n)-2*n; d=abs(m)-m-n; i=(n-1)%8+1; sc=sc-l[i]+d; l[i]=d; if(sc==0, print1(n-7, ", "))) \\ C. Ronaldo (aga_new_ac(AT)hotmail.com), Jan 02 2005
CROSSREFS
KEYWORD
nonn,more
AUTHOR
EXTENSIONS
More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Jan 02 2005
a(19)-a(27) from Donovan Johnson, Aug 15 2011
STATUS
approved
