login
Partial sums of product of twin primes.
2

%I #7 Dec 28 2023 22:16:50

%S 15,50,193,516,1415,3178,6777,11960,22363,34026,53069,75568,107967,

%T 144830,184033,236016,293615,366514,446037,543380,664483,840882,

%U 1027505,1240948,1513431,1838330,2198329,2580252,2992415,3428014,4084113,4759796,5445379,6181542

%N Partial sums of product of twin primes.

%t Accumulate[Times@@@Select[Partition[Prime[Range[500]],2,1], Last[#]- First[#] ==2&]]

%Y Cf. A037074.

%K nonn

%O 1,1

%A _Harvey P. Dale_, Jun 14 2011