OFFSET
0,2
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..1000
EXAMPLE
a(6) = 24 as there are 6 values the prime p can take, 5, 7, 13, 17, 19 and 23 < 24 so that 24 + p is also prime.
PROG
(PARI) {stop=1050; m=56; v=vector(m, x, -1); for(n=1, stop, c=0; forprime(p=2, n-1, if(isprime(n+p), c++)); if(c<m&&v[c+1]<0, v[c+1]=n)); for(j=1, m, print1(v[j], ", "))}
(Haskell)
import Data.List (elemIndex)
import Data.Maybe (fromJust)
a092954 = (+ 1) . fromJust . (`elemIndex` a092953_list)
-- Reinhard Zumkeller, Nov 10 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Mar 24 2004
EXTENSIONS
More terms from Klaus Brockhaus and Mohammed Bouayoun (bouyao(AT)wanadoo.fr), Mar 25 2004
STATUS
approved