[go: up one dir, main page]

login
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
OFFSET
1,1
COMMENTS
18-1=17;18+1=19,...
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
Sequence in context: A056438 A218617 A105521 * A325043 A338536 A090073
KEYWORD
nonn
AUTHOR
STATUS
approved