|
%I #14 Jul 16 2022 22:50:36
%S 0,1,3,6,10,14,20,25,31,35,41,49,58,66,74,78,84,88,100,108,116,128,
%T 136,140,148,160,169,177,181,193,203,215,223,231,239,245,257,269,279,
%U 283,289,293,311,319,333,342,354,370,378,382,394,402,410,430,438,447,451,457,473
%N Record values in A079551.
%H Amiram Eldar, <a href="/A079552/b079552.txt">Table of n, a(n) for n = 0..10000</a>
%F a(n) = A000005(A006093(n)) + a(n-1). - _Jon Maiga_, Jan 02 2019
%t RecurrenceTable[{a[0]==0, a[n]==DivisorSigma[0,Prime[n]-1]+a[n-1]}, a, {n, 100}] (* _Jon Maiga_, Jan 02 2019 *)
%Y Cf. A000005, A006093, A079551.
%Y Partial sums of A008328.
%K nonn
%O 0,3
%A _N. J. A. Sloane_, Jan 24 2003
|
