A108264 Consider primes p and q such that p = 2^k + 9 and q = 2^(k+1) + 9 for some k; sequence gives values of p.

11, 13, 41, 73, 521

Offset

1,1

Comments

No additional terms up to k=5000. - Harvey P. Dale, Mar 08 2015

Links

Table of n, a(n) for n=1..5.

Mathematica

2^#+9&/@(Flatten[Position[Partition[If[PrimeQ[#], 1, 0]&/@(2^Range[10]+ 9), 2, 1], {1, 1}]]) (* Harvey P. Dale, Mar 08 2015 *)

Prog

(PARI) g(m, n, b) = { for(x=0, n, y=m+b^x+b%2; z=m+b^(x+1)+b%2; if(isprime(y)&isprime(z), print1(y", ") ) ) }

Crossrefs

Cf. A108265.

Sequence in context: A132241 A329175 A045467 * A023268 A154292 A188386

Adjacent sequences: A108261 A108262 A108263 * A108265 A108266 A108267

Keyword

nonn

Author

Cino Hilliard, Jun 29 2005

Status

approved