login
A072573
Odd interprimes not divisible by 3.
12
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
OFFSET
1,1
LINKS
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
KEYWORD
nonn
AUTHOR
Marco Matosic, Jun 25 2002
EXTENSIONS
Edited by N. J. A. Sloane and Robert G. Wilson v, Jun 27 2002
STATUS
approved