|
| |
|
|
A076664
|
|
a(n) = Sum_{k=1,...,n} antisigma(k), where antisigma(i) = sum of the nondivisors of i that are between 1 and i.
|
|
0
| |
|
|
0, 0, 2, 5, 14, 23, 43, 64, 96, 133, 187, 237, 314, 395, 491, 596, 731, 863, 1033, 1201, 1400, 1617, 1869, 2109, 2403, 2712, 3050, 3400, 3805, 4198, 4662, 5127, 5640, 6181, 6763, 7338, 8003, 8684, 9408, 10138, 10957, 11764, 12666, 13572, 14529, 15538
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
EXAMPLE
| a(5) = antisigma(1) + ... + antisigma(5) = 0 + 0 + 2 + 3 + 9 = 14.
|
|
|
MATHEMATICA
| l = {}; s = 0; Do[s = s + (n (n + 1) / 2) - DivisorSigma[1, n]; l = Append[l, s], {n, 1, 100}]; l
|
|
|
CROSSREFS
| Sequence in context: A015633 A176191 A131661 * A049939 A133375 A057295
Adjacent sequences: A076661 A076662 A076663 * A076665 A076666 A076667
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Oct 24 2002
|
| |
|
|
