A274829 Numbers in the range of the sum of deficient divisors function.

1, 3, 4, 6, 7, 8, 10, 12, 13, 14, 15, 18, 19, 20, 22, 24, 27, 28, 30, 31, 32, 34, 36, 38, 40, 42, 43, 44, 46, 48, 52, 54, 56, 57, 60, 62, 63, 64, 66, 68, 70, 72, 74, 75, 76, 78, 80, 84, 86, 90, 92, 93, 94, 96, 97, 98, 102, 104, 105, 106, 108, 110, 112, 114, 118, 120, 121, 122, 123, 124, 126, 127, 128, 130, 132, 133, 134, 135, 138, 139, 140, 142, 144, 148, 150, 151, 152, 153, 154, 156, 158

Offset

1,2

Comments

Possible values for the sum of deficient divisors of the positive integers, written in ascending order.

Links

Table of n, a(n) for n=1..91.

Mathematica

Take[#, 100] &@ Union@ Table[Total@ Select[Divisors@ n, DivisorSigma[1, #] < 2 # &], {n, 10^4}] (* Michael De Vlieger, Jul 13 2016 *)

Crossrefs

Cf. A005100, A187793, A210510 (complement).

Sequence in context: A083922 A039042 A007378 * A087758 A227019 A105454

Adjacent sequences: A274826 A274827 A274828 * A274830 A274831 A274832

Keyword

nonn

Author

Timothy L. Tiffin, Jul 07 2016

Status

approved