A063939 Numbers p from A001125 such that 2*p-3 is prime.

41, 251, 991, 1471, 2551, 3301, 4211, 4721, 4931, 5167, 5581, 5791, 7351, 8317, 8581, 9157, 9781, 11701, 12517, 13093, 15541, 16741, 16927, 17341, 18301, 18397, 19121, 19231, 20411, 22571, 23911, 24151, 25741, 26293, 26317, 26681, 27031

Offset: 1

Author

Jason Earls, Aug 31 2001

Keywords

• easy
• nonn

Links

• Harry J. Smith, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A001125.

Programs

PARI

j=[]; forprime(p=3,40000, if(znprimroot(p)==6, if(isprime(2*p- 3),j=concat(j,p)))); j

PARI

{ n=0; p=0; for (m=1, 10^9, p=nextprime(p+1); if (znprimroot(p)==6 && isprime(2*p - 3), write("b063939.txt", n++, " ", p); if (n==1000, break)) ) } \\ Harry J. Smith, Sep 03 2009