|
Search: id:A137870
|
|
|
| A137870 |
|
Prime numbers, isolated from neighboring primes by +-6. |
|
+0
1
|
|
| 211, 293, 409, 479, 631, 691, 701, 709, 719, 787, 797, 839, 919, 929, 1163, 1171, 1201, 1249, 1259, 1381, 1399, 1409, 1471, 1511, 1523, 1531, 1637, 1709, 1733, 1801, 1811, 1823, 1831, 1847, 1889, 2039, 2053, 2099, 2153, 2161, 2179, 2221, 2251, 2459, 2503
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
The distance to the nearest prime has to exceed 6, and equality is not allowed. - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), May 02 2008
|
|
EXAMPLE
|
211-199=12 and 223-211=12
293-283=10 and 307-293=14
|
|
MATHEMATICA
|
q=6; 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]
Prime[Select[Range[2, 1500], Prime[ # - 1] + 6 < Prime[ # ] < Prime[ # + 1] - 6 &]] - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), May 02 2008
|
|
CROSSREFS
|
Adjacent sequences: A137867 A137868 A137869 this_sequence A137871 A137872 A137873
Sequence in context: A087833 A096706 A001583 this_sequence A137871 A142582 A139651
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 29 2008
|
|
EXTENSIONS
|
More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), May 02 2008
|
|
|
Search completed in 0.002 seconds
|
