OFFSET
1,1
COMMENTS
a(n) is a proper divisor of A181595(n).
LINKS
Michel Marcus, Table of n, a(n) for n = 1..200
Paul Pollack and Vladimir Shevelev, On perfect and near-perfect numbers, J. Number Theory 132 (2012), pp. 3037-3046. arXiv:1011.6160
EXAMPLE
Since A181595(1)=12, a(1)=sigma(12)-2*12=28-24=4.
MATHEMATICA
Reap[For[n = 12, n <= 2 10^7, n++, abn = DivisorSigma[1, n] - 2n; If[1 < abn < n && Divisible[n, abn], Print[{n, abn}]; Sow[abn]]]][[2, 1]] (* Jean-François Alcover, Oct 28 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Shevelev, Nov 01 2010
EXTENSIONS
a(10)-a(11) corrected by Vladimir Shevelev, Nov 03 2010
Entries checked, definition shortened by R. J. Mathar, Nov 17 2010
More terms from Michel Marcus, Feb 06 2016
STATUS
approved