|
|
A237588
|
|
Sigma(n) - 2n + 1.
|
|
3
|
|
|
0, 0, -1, 0, -3, 1, -5, 0, -4, -1, -9, 5, -11, -3, -5, 0, -15, 4, -17, 3, -9, -7, -21, 13, -18, -9, -13, 1, -27, 13, -29, 0, -17, -13, -21, 20, -35, -15, -21, 11, -39, 13, -41, -3, -11, -19, -45, 29, -40, -6, -29, -5, -51, 13, -37, 9, -33, -25, -57, 49, -59, -27, -21, 0
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,5
|
|
COMMENTS
|
Also we can write Sigma(n) - (2n - 1).
a(n) = 2 - n iff n is prime.
a(n) = 1 iff n is a perfect number.
Conjecture: a(n) = 0 iff n is a power of 2.
The problem is not new. In fact, the following comments appeared on page 74 of Guy's book: "If Sigma(n) = 2*n - 1, n has been called almost perfect. Powers of 2 are almost perfect; it is not known if any other numbers are.". - Zhi-Wei Sun, Feb 23 2014
|
|
REFERENCES
|
R. K. Guy, Unsolved Problems in Number Theory, 3rd Edition, Springer, New York, 2004.
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
-----------------------------------------------
. The sum of The positive
n divisors of n odd numbers a(n)
-----------------------------------------------
1 1 1 0
2 3 3 0
3 4 5 -1
4 7 7 0
5 6 9 -3
6 12 11 1
7 8 13 -5
8 15 15 0
9 13 17 -4
10 18 19 -1
...
|
|
MATHEMATICA
|
Table[DivisorSigma[1, n]-2n+1, {n, 70}] (* Harvey P. Dale, Nov 15 2014 *)
|
|
PROG
|
(PARI) vector(100, n, sigma(n)-2*n+1) \\ Colin Barker, Feb 21 2014
|
|
CROSSREFS
|
Cf. A000079, A000203, A000396, A001065, A004125, A005408, A033879, A033880, A039653, A120444, A196020, A235796, A236104.
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|