A082100 - OEIS

A082100

a(n) = A001157(A002110(n)), sum of squares of divisors of primorial numbers.

5, 50, 1300, 65000, 7930000, 1348100000, 390949000000, 141523538000000, 75007475140000000, 63156294067880000000, 60756354893300560000000, 83236206203821767200000000, 140003298834828212430400000000

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Amiram Eldar, Table of n, a(n) for n = 1..195

MATHEMATICA

s={}; p=1; prod=1; Do[prod *= (p = NextPrime@p); AppendTo[s, DivisorSigma[2, prod]], {13}]; s (* Amiram Eldar, Jul 31 2019 *)

Table[DivisorSigma[2, p], {p, FoldList[Times, Prime[Range[20]]]}] (* Harvey P. Dale, Mar 11 2023 *)

CROSSREFS

Cf. A001157, A002110.

Sequence in context: A051893 A354685 A247951 * A299353 A180976 A305844

Adjacent sequences: A082097 A082098 A082099 * A082101 A082102 A082103

KEYWORD

nonn

AUTHOR

Labos Elemer, Apr 14 2003

STATUS

approved