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,1

Links

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

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

Crossrefs

Cf. A154563, A074378.

Sequence in context: A362303 A290631 A116693 * A066562 A073877 A248538

Adjacent sequences: A154562 A154563 A154564 * A154566 A154567 A154568

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Jan 12 2009

Status

approved