|
| |
|
|
A008332
|
|
Sum of divisors of p-1, p prime.
|
|
1
| |
|
|
1, 3, 7, 12, 18, 28, 31, 39, 36, 56, 72, 91, 90, 96, 72, 98, 90, 168, 144, 144, 195, 168, 126, 180, 252, 217, 216, 162, 280, 248, 312, 252, 270, 288, 266, 372, 392, 363, 252, 308, 270, 546, 360, 508, 399, 468, 576, 456, 342, 560, 450, 432, 744, 468, 511, 396, 476, 720, 672
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 2,2
|
|
|
MAPLE
| for i from 1 to 500 do if isprime(i) then print(sigma(i-1)); fi; od;
|
|
|
MATHEMATICA
| lst={}; Do[AppendTo[lst, DivisorSigma[1, Prime[n]-1]], {n, 6!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 20 2008]
|
|
|
CROSSREFS
| Sequence in context: A024388 A184534 A109638 * A065390 A171835 A062714
Adjacent sequences: A008329 A008330 A008331 * A008333 A008334 A008335
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com).
|
| |
|
|
