|
| |
|
|
A085909
|
|
Smallest prime p>prime(n) such that p+prime(n+1)-prime(n) is the next prime after p; or a(n)=0 if no such prime exists.
|
|
2
| |
|
|
0, 5, 11, 13, 17, 19, 29, 37, 31, 41, 47, 43, 59, 67, 53, 61, 71, 73, 79, 101, 83, 97, 131, 359, 103, 107, 109, 137, 127, 293, 163, 151, 149, 181, 179, 157, 167, 193, 173, 233, 191, 241, 197, 223, 227, 211, 467, 229, 239, 277, 251, 269, 283, 257, 263, 271, 281
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| A001223(n) = A001223(A049084(a(n))); a(A001359(n)) = A001359(n+1); conjecture: a(n)>0 for n>1 (implies twin prime conjecture). - Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Jan 26 2004
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Prime Difference Function
|
|
|
PROG
| (Matlab program by D. Wasserman) P = primes(5000); A = zeros(1, length(P)); D = P(2:end) - P(1:(length(P) - 1)); for i = 2:2:(max(D)); f = find(D == i); A(f(1:(length(f) - 1))) = P(f(2:end)); end; A(2:100)
|
|
|
CROSSREFS
| Cf. A085910.
Sequence in context: A087759 A161548 A090320 * A104110 A038936 A106091
Adjacent sequences: A085906 A085907 A085908 * A085910 A085911 A085912
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jul 09 2003
|
|
|
EXTENSIONS
| More terms from Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com) and David Wasserman (wasserma(AT)spawar.navy.mil), Jan 26 2004
Edited by N. J. A. Sloane (njas(AT)research.att.com), Oct 21 2008 at the suggestion of R. J. Mathar
|
| |
|
|
