|
Search: id:A138063
|
|
|
| A138063 |
|
Prime number n, lesser of twin primes, isolated from neighboring primes by +- 10 (or more). |
|
+0
1
|
|
| 521, 1931, 1949, 2111, 2309, 2591, 3389, 4421, 4547, 6449, 6761, 7349, 7949, 9239, 9719, 9767, 10007, 10037, 10499, 10529, 10709, 11351, 11549, 11717
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
521- 2 = 519 (3*173) 523+ 2 = 525 (3*5*7)
521- 4 = 517 (11*43) 523+ 4 = 527 (17*31)
521- 6 = 515 (5*103) 523+ 6 = 529 (23*23)
521- 8 = 513 (3*3*3*19) 523+ 8 = 531 (3*3*59)
521-10 = 511 (7*73) 523+10 = 533 (13*41)
|
|
MATHEMATICA
|
q=10; s=""; For[i=1, i<10^2*5, n=Prime[i]; m=n+2; If[PrimeQ[m], a=0; For[j=2, j<=q, If[PrimeQ[n-j]||PrimeQ[m+j], a=1; Break[]]; j=j+2]; If[a==0, s=s<>ToString[n]<>", "]]; i++ ]; Print[s]
|
|
CROSSREFS
|
Sequence in context: A113158 A004928 A004948 this_sequence A167734 A122715 A153180
Adjacent sequences: A138060 A138061 A138062 this_sequence A138064 A138065 A138066
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vladimir Orlovsky (4vladimir(AT)gmail.com), May 02 2008
|
|
|
Search completed in 0.002 seconds
|
