|
|
A152986
|
|
Sum of proper divisors minus the number of proper divisors of pentagonal number A000326(n).
|
|
1
|
|
|
0, 0, 11, 11, 10, 18, 67, 71, 60, 32, 187, 351, 30, 46, 519, 337, 128, 220, 577, 483, 366, 286, 507, 1153, 248, 336, 2489, 847, 70, 818, 871, 2181, 1108, 116, 2861, 2275, 694, 130, 2763, 3645, 100, 2352, 2823, 1863, 2278, 158, 3607, 6617, 636, 920, 6181, 4019
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
|
|
MATHEMATICA
|
DivisorSigma[1, #]-#-DivisorSigma[0, #]+1&/@PolygonalNumber[5, Range[60]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 02 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|