|
Search: id:A137869
|
|
|
| A137869 |
|
Prime numbers, isolated from neighboring primes by +-4. |
|
+0
1
|
|
| 53, 89, 157, 173, 211, 251, 257, 263, 293, 331, 337, 359, 367, 373, 389, 409
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
53-47(previous)=6
59(next)-53=6
|
|
MATHEMATICA
|
q=4; s=""; For[i=1, i<12^2, p=Prime[i]; a=0; For[j=2, j<=q, If[PrimeQ[p-j]||PrimeQ[p+j], a=1; Break[]]; j=j+2]; If[a==0, s=s<>ToString[p]<>", "]; i++ ]; Print[s]
|
|
CROSSREFS
|
Sequence in context: A118149 A119289 A124282 this_sequence A096697 A033234 A142296
Adjacent sequences: A137866 A137867 A137868 this_sequence A137870 A137871 A137872
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 29 2008
|
|
|
Search completed in 0.002 seconds
|
