login
A181291
Primes P(k) such that (2^k-P(k))*2^k-1 is prime.
0
3, 5, 17, 29, 37, 47, 53, 61, 67, 103, 131, 239, 433, 613, 1907, 2339, 3319, 3467, 4157, 4831, 6221, 6257, 6737, 6967, 7517, 8807, 15101, 15901, 27197, 58207, 100703, 144847, 324871, 607703
OFFSET
1,1
PROG
(PARI) is(n, k=primepi(n))=ispseudoprime((2^k-n)*2^k-1) && isprime(n)
c=0; forprime(p=2, 1e9, if(is(p, c++), print1(p", "))) \\ Charles R Greathouse IV, Nov 25 2014
CROSSREFS
Sequence in context: A058580 A161682 A079373 * A038703 A283806 A163586
KEYWORD
nonn
AUTHOR
Pierre CAMI, Jul 09 2011
EXTENSIONS
Incorrect a(34) removed by Charles R Greathouse IV, Nov 25 2014
a(34) from Charles R Greathouse IV, Dec 22 2014
STATUS
approved