|
Search: id:A138058
|
|
|
| A138058 |
|
Prime numbers, isolated from neighboring primes by +- 100 (or more). |
|
+0
4
|
|
| 72546283, 77736383, 85706813, 98486567, 102765683, 112219883, 117611743, 135393509, 142414669, 148261577, 162551173, 162821917, 163175267, 163710121, 172005979, 172341509, 177110701, 178924853, 204020153, 211140343, 226770241
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
q=100; s=""; For[i=1, i<10^7*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: A084071 A104942 A104849 this_sequence A022228 A032431 A109178
Adjacent sequences: A138055 A138056 A138057 this_sequence A138059 A138060 A138061
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vladimir Orlovsky (4vladimir(AT)gmail.com), May 02 2008
|
|
EXTENSIONS
|
More terms Vladimir Orlovsky (4vladimir(AT)gmail.com), Jan 24 2009
|
|
|
Search completed in 0.002 seconds
|
