OFFSET
1,9
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..10000
MATHEMATICA
GCD[DivisorSigma[1, n+1]-(n+1), DivisorSigma[1, n]-n]
PROG
(PARI)
A001065(n) = (sigma(n) - n);
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Apr 11 2002
STATUS
approved