A124620 - OEIS

A124620

Odd interprimes divisible by 17.

459, 765, 969, 1003, 1207, 1377, 1581, 1785, 2295, 2601, 2703, 3213, 3723, 3995, 4131, 4403, 4641, 4947, 5933, 5967, 6409, 6477, 6579, 6613, 6749, 6987, 7701, 8075, 8517, 9435, 9741, 9775, 9877, 9945, 10217, 10455, 10897, 10965, 11305, 11645

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)

MATHEMATICA

Do[If[OddQ[(Prime[n + 1] + Prime[n])/2] && Mod[(Prime[n + 1] + Prime[n])/2, 17] == 0, Print[(Prime[n + 1] + Prime[n])/2]], {n, 1, 3000}] (*Artur Jasinski*)

Select[Range[17, 12000, 34], !PrimeQ[#]&&#-NextPrime[#, -1]==NextPrime[#]-#&] (* Harvey P. Dale, Nov 18 2012 *)

CROSSREFS

Cf. A072569, A072572, A072573, A126228, A126229, A126230, A124619, A126231, A124622, A126233.

Sequence in context: A286845 A062043 A331468 * A224456 A121970 A055162

Adjacent sequences: A124617 A124618 A124619 * A124621 A124622 A124623

KEYWORD

nonn

AUTHOR

Artur Jasinski, Dec 21 2006

EXTENSIONS

Extended by Ray Chandler, Jan 09 2007

STATUS

approved