A154565 One-half of averages of twin prime pairs of A001318.

2, 15, 51, 210, 330, 651, 1365, 1650, 1926, 3480, 5430, 5985, 6501, 11310, 16485, 16590, 21660, 25026, 27270, 28635, 35190, 38001, 39285, 46905, 48690, 58905, 64170, 90651, 109485, 143376, 148995, 151845, 190995, 311676, 316251, 332526

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jan 12 2009

Keywords

• nonn

Links

• G. C. Greubel, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A154563, A074378.

Programs

Mathematica

q=3;lst={};s=0;Do[s+=n/q;If[Floor[s]==s,If[PrimeQ[2*s-1]&&PrimeQ[2*s+1],AppendTo[lst,s]]],{n,0,8!}];lst