OFFSET
1,1
COMMENTS
Primes prime(n) which multiplied by the associated prime gap g=A001223(n) remain <= 2^g.
EXAMPLE
2 is in the sequence because 2*(3-2) = 2^(3-2), 113 is in the sequence because 113*(127-113) < 2^(127-113).
PROG
(PARI) isA209611(p)={
local(q=nextprime(p+1)-p) ;
return(isprime(p) && p*q <= 2^q) ; }
{
forprime(p=2, 3100, if(isA209611(p), print1(p" ") ) ; ) ;
} /* R. J. Mathar, Mar 19 2012 */
CROSSREFS
KEYWORD
nonn
AUTHOR
Gerasimov Sergey, Mar 10 2012
STATUS
approved