OFFSET
0,3
COMMENTS
a(A139433(n)) = 0.
LINKS
N. J. A. Sloane, Table of n, a(n) for n = 0..10000
MATHEMATICA
Join[{a = 0}, Table[If[a < (x = DivisorSigma[0, n]), a += x, a -= x]; a, {n, 91}]] (* Jayanta Basu, Jun 06 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Apr 21 2008
EXTENSIONS
More terms from Sean A. Irvine, Dec 02 2009
STATUS
approved