|
|
A154563
|
|
Averages of twin prime pairs of A074378.
|
|
1
|
|
|
18, 60, 138, 150, 1278, 1620, 2730, 4128, 6360, 11718, 13398, 17490, 20808, 23028, 28308, 29670, 51870, 61380, 69828, 73848, 78540, 92568, 97500, 115770, 138570, 166668, 176610, 193380, 200928, 258318, 304980, 430008, 500910, 518760, 536190
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
18-1=17;18+1=19,...
|
|
LINKS
|
|
|
MATHEMATICA
|
q=2; lst={}; s=0; Do[s+=n/q; If[Floor[s]==s, If[PrimeQ[s-1]&&PrimeQ[s+1], AppendTo[lst, s]]], {n, 0, 8!}]; lst
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|