|
Search: id:A124620
|
|
|
| A124620 |
|
Odd interprimes divisible by 17. |
|
+0 8
|
|
| 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; listen)
|
|
|
OFFSET
|
1,1
|
|
|
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*)
|
|
CROSSREFS
|
Cf. A072569, A072572, A072573, A126228, A126229, A126230, A124619, A126231, A124622, A126233.
Sequence in context: A020364 A093058 A062043 this_sequence A121970 A055162 A055159
Adjacent sequences: A124617 A124618 A124619 this_sequence A124621 A124622 A124623
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Dec 21 2006
|
|
EXTENSIONS
|
Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Jan 09 2007
|
|
|
Search completed in 0.002 seconds
|