|
|
A272173
|
|
Product of the sum of the divisors of n and the sum of the divisors of n-th prime.
|
|
5
|
|
|
3, 12, 24, 56, 72, 168, 144, 300, 312, 540, 384, 1064, 588, 1056, 1152, 1674, 1080, 2418, 1360, 3024, 2368, 2880, 2016, 5400, 3038, 4284, 4160, 6048, 3300, 8208, 4096, 8316, 6624, 7560, 7200, 13832, 6004, 9840, 9408, 15660, 7560, 17472, 8448, 16296, 15444, 14400, 10176, 27776
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Numbers that occur twice in the sequence include 7560, 816000, 2709504, 31752000. Are there infinitely many? Does any number occur more than twice? - Robert Israel, Sep 12 2018
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
For n = 9 the sum of the divisors of 9 is 1 + 3 + 9 = 13, and the 9th prime is 23, and the sum of the divisors of 23 is 1 + 23 = 24, and 13*24 = 312, so a(9) = 312.
On the other hand 9*23 = 207, and the sum of the divisors of 207 is 1 + 3 + 9 + 23 + 69 + 207 = 312, so a(9) = 312.
|
|
MAPLE
|
f:= n -> numtheory:-sigma(n)*(1+ithprime(n)):
|
|
MATHEMATICA
|
Table[DivisorSigma[1, n]*DivisorSigma[1, Prime[n]], {n, 1, 50}] (* G. C. Greubel, Apr 27 2016 *)
|
|
PROG
|
(PARI) a(n) = sigma(n)*sigma(prime(n)); \\ Michel Marcus, Apr 27 2016
(Magma) [SumOfDivisors(n)*SumOfDivisors(NthPrime(n)): n in [1..50]]; // Vincenzo Librandi, Sep 13 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|