A079552 Record values in A079551.

0, 1, 3, 6, 10, 14, 20, 25, 31, 35, 41, 49, 58, 66, 74, 78, 84, 88, 100, 108, 116, 128, 136, 140, 148, 160, 169, 177, 181, 193, 203, 215, 223, 231, 239, 245, 257, 269, 279, 283, 289, 293, 311, 319, 333, 342, 354, 370, 378, 382, 394, 402, 410, 430, 438, 447, 451, 457, 473

Offset: 0

Author

N. J. A. Sloane, Jan 24 2003

Keywords

• nonn

Links

• Amiram Eldar, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A000005, A006093, A079551.

Partial sums of A008328.

Programs

Mathematica

RecurrenceTable[{a[0]==0, a[n]==DivisorSigma[0,Prime[n]-1]+a[n-1]}, a, {n, 100}] (* Jon Maiga, Jan 02 2019 *)

Formula

a(n) = A000005(A006093(n)) + a(n-1). - Jon Maiga, Jan 02 2019