OFFSET
1,1
COMMENTS
This sequence initially shares many terms with A180163 because small amicable pairs are sometimes consecutive terms in the sorted list of amicable numbers, A063990.
First differs from A180163 at a(9). - Omar E. Pol, Oct 25 2017
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from T. D. Noe)
FORMULA
MATHEMATICA
s[n_] := DivisorSigma[1, n]-n; smallAmicableQ[n_] := Module[{b=s[n]}, n<b && s[b]==n]; a=Select[Range[10^6], smallAmicableQ]; Table[n*s[n], {n, a}]
CROSSREFS
KEYWORD
nonn
AUTHOR
T. D. Noe, Aug 15 2010
STATUS
approved