|
| |
|
|
A072573
|
|
Odd interprimes not divisible by 3.
|
|
11
| |
|
|
205, 217, 473, 515, 625, 667, 803, 1003, 1207, 1243, 1313, 1465, 1505, 1517, 1537, 1681, 1715, 1795, 1817, 1895, 2075, 2105, 2191, 2303, 2405, 2453, 2585, 2627, 2783, 2933, 3055, 3073, 3175, 3197, 3265, 3337, 3353, 3505, 3565, 3665, 3937, 3995, 4085
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| a = Table[ Prime[n], {n, 2, 600}]; b = {}; Do[d = (a[[n + 1]] - a[[n]])/2; If[ OddQ[ a[[n]] + d] && Mod[d, 3] == 0, b = Append[b, a[[n]] + d]], {n, 1, 598}]; b
|
|
|
CROSSREFS
| Cf. A072569, A072572, A024675.
Sequence in context: A154518 A099105 A194192 * A116177 A191834 A042983
Adjacent sequences: A072570 A072571 A072572 * A072574 A072575 A072576
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Marco Matosic (marcomatosic(AT)hotmail.com), Jun 25 2002
|
|
|
EXTENSIONS
| Edited by N. J. A. Sloane (njas(AT)research.att.com) and Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 27 2002
|
| |
|
|
