|
Search: id:A124619
|
|
|
| A124619 |
|
Odd interprimes divisible by 13. |
|
+0
8
|
|
| 39, 195, 351, 741, 897, 1313, 1443, 1599, 2379, 2405, 2535, 2613, 2691, 2847, 3055, 3081, 3627, 3705, 4641, 4771, 5031, 5577, 5655, 5889, 5967, 6045, 6201, 6409, 6825, 6877, 6903, 7007, 7033, 7605, 7943, 8437, 8541, 8931, 8957, 9009, 9035, 9321, 9607
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
Do[If[OddQ[(Prime[n + 1] + Prime[n])/2] && Mod[(Prime[n + 1] + Prime[n])/2, 13] == 0, Print[(Prime[n + 1] + Prime[n])/2]], {n, 1, 3000}] (*Artur Jasinski*)
|
|
CROSSREFS
|
Cf. A072569, A072572, A072573, A126228, A126229, A126230, A124620, A126231, A124622, A126233.
Sequence in context: A072253 A128826 A105838 this_sequence A068975 A101627 A070146
Adjacent sequences: A124616 A124617 A124618 this_sequence A124620 A124621 A124622
|
|
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
|
