login
A037209
Primes n such that nextprime(n) - n = ( number of divisors of (nextprime(n)+n)/2 )-1.
0
3, 61, 79, 317, 4730603, 9150613, 14791703, 27154511, 59259191, 203404631, 234273623, 237683879, 263802551, 314778551, 477772151, 500998679, 507736049, 628103831, 803042231, 1047040151, 1222341431, 1516790903, 1826793071, 2037439031, 2070067991, 2310340343
OFFSET
1,1
PROG
(PARI) p1=3; for(m=2, 112664172, p2=nextprime(p1+1); if(p2-p1==numdiv((p2+p1)/2)-1, print1(p1 ", ")); p1=p2) /* Donovan Johnson, Sep 10 2012 */
CROSSREFS
Sequence in context: A297562 A128075 A106883 * A181505 A105430 A141979
KEYWORD
nonn
EXTENSIONS
Next term if it exists is > 2*10^6. - Michel ten Voorde Apr 13 2001
Offset corrected and a(5)-a(26) from Donovan Johnson, Sep 10 2012
STATUS
approved