|
Search: id:A072572
|
|
|
| A072572 |
|
Odd interprimes divisible by 3. |
|
+0
12
|
|
| 9, 15, 21, 39, 45, 69, 81, 93, 99, 105, 111, 129, 165, 195, 225, 231, 279, 309, 315, 351, 363, 381, 393, 399, 405, 441, 453, 459, 465, 483, 489, 495, 501, 615, 645, 675, 687, 705, 723, 741, 747, 759, 765, 771, 825, 855, 861, 879, 885, 897, 909, 915, 933
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
a = Table[ Prime[n], {n, 2, 200}]; 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, 198}]; b
|
|
CROSSREFS
|
Cf. A072569, A072573, A024675.
Adjacent sequences: A072569 A072570 A072571 this_sequence A072573 A072574 A072575
Sequence in context: A020192 A063174 A072569 this_sequence A029708 A125215 A102739
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Marco Matosic (marcomatosic(AT)hotmail.com), Jun 25 2002
|
|
EXTENSIONS
|
Edited by njas and Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 27 2002
Corrected by T. D. Noe (noe(AT)sspectra.com), Nov 01 2006
|
|
|
Search completed in 0.002 seconds
|
