A322420 - OEIS

%I #11 Jul 14 2021 19:27:21

%S 0,5,41,197,639,1593,3447,6601,11599,19113,29897,44683,64615,90763,

%T 124211,166551,218759,283081,360979,454095,564319,694297,846287,

%U 1021511,1223095,1454367,1717867,2016457,2352313,2728929,3149913,3619807,4141547

%N Sum of the first n*(n+1) primes.

%C Partial sums of A109726.

%H Ray Chandler, <a href="/A322420/b322420.txt">Table of n, a(n) for n = 0..10000</a>

%F a(n) = A007504(A002378(n)).

%t f[n_] := Sum[Prime[k], {k, n}]; Table[f[n*(n+1)], {n, 0, 32}]

%t Module[{nn=40,ap},ap=Join[{0},Accumulate[Prime[Range[nn^2-nn+1]]]];Table[ ap[[n^2-n+1]],{n,nn}]] (* _Harvey P. Dale_, Jul 14 2021 *)

%Y Cf. A002378, A007504, A109722-A109726, A122207, A122208, A322421, A322422.

%K nonn

%O 0,2

%A _Ray Chandler_, Dec 07 2018