|
|
A154565
|
|
One-half of averages of twin prime pairs of A001318.
|
|
1
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
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: A025213 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
|
|
|
|