login
A191746
Partial sums of product of twin primes.
2
15, 50, 193, 516, 1415, 3178, 6777, 11960, 22363, 34026, 53069, 75568, 107967, 144830, 184033, 236016, 293615, 366514, 446037, 543380, 664483, 840882, 1027505, 1240948, 1513431, 1838330, 2198329, 2580252, 2992415, 3428014, 4084113, 4759796, 5445379, 6181542
OFFSET
1,1
MATHEMATICA
Accumulate[Times@@@Select[Partition[Prime[Range[500]], 2, 1], Last[#]- First[#] ==2&]]
CROSSREFS
Cf. A037074.
Sequence in context: A103777 A134742 A318084 * A029941 A349817 A278909
KEYWORD
nonn
AUTHOR
Harvey P. Dale, Jun 14 2011
STATUS
approved