A033883 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A033883

Deficiency of the deficient or perfect numbers: m = 2n - sigma(n) for n such that m >= 0.

1, 1, 2, 1, 4, 0, 6, 1, 5, 2, 10, 12, 4, 6, 1, 16, 18, 10, 8, 22, 19, 10, 14, 0, 28, 30, 1, 18, 14, 22, 36, 16, 22, 40, 42, 4, 12, 20, 46, 41, 7, 30, 6, 52, 38, 34, 26, 58, 60, 28, 22, 1, 46, 66, 10, 42, 70, 72, 34, 26, 12, 58

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,3

LINKS

Table of n, a(n) for n=0..61.

MAPLE

A033883 := proc(n)

A033879(A263837(n)) ;

end proc:

seq(A033883(n), n=1..100) ; # R. J. Mathar, Jun 06 2024

MATHEMATICA

Select[Table[2n-DivisorSigma[1, n], {n, 80}], #>=0&] (* Harvey P. Dale, Jun 01 2018 *)

CROSSREFS

Sequence in context: A033880 A033879 A324546 * A106316 A300721 A126707

Adjacent sequences: A033880 A033881 A033882 * A033884 A033885 A033886

KEYWORD

nonn

AUTHOR

N. J. A. Sloane.

STATUS

approved