|
Search: id:A089795
|
|
|
| A089795 |
|
Smallest prime(k) such that prime(k)-prime(k-1) is equal to prime(k+n)-prime(k). |
|
+0
1
|
|
| 5, 37, 1009, 4327, 6197, 6947, 43391, 31469, 1324567, 678719, 6655531, 1895479, 6085103, 21500429, 93685619, 523000399, 20388727, 709208557
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Cf. A089344.
|
|
EXAMPLE
|
a(4) = 4327, the previous prime is 4297, 4327-4297 = 30, the four next
primes are 4337, 4339, 4349 and 4357. 4357-4327 = 30.
|
|
MATHEMATICA
|
f[n_] := Block[{k = n + 1}, While[ 2Prime[k] != Prime[k - 1] + Prime[k + n], k++ ]; Prime[k]]; Table[ f[n], {n, 18}]
|
|
PROGRAM
|
(PARI) a(n)=local(k=1); if(n<1, 0, until(prime(k)-prime(k-1)==prime(k+n)-prime(k), k++); prime(k)) - Michael Somos Feb 01 2004
|
|
CROSSREFS
|
Sequence in context: A003213 A166851 A090439 this_sequence A081971 A086877 A061674
Adjacent sequences: A089792 A089793 A089794 this_sequence A089796 A089797 A089798
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 11 2003
|
|
|
Search completed in 0.002 seconds
|
