A155188 Sophie Germain primes that are also strong primes and lesser of twin prime pairs.
11, 29, 41, 179, 191, 239, 281, 419, 431, 641, 659, 809, 1019, 1031, 1049, 1229, 1289, 1451, 1481, 1931, 2129, 2141, 2339, 2549, 2969, 3299, 3329, 3359, 3389, 3539, 3821, 3851, 4019, 4271, 4481, 5231, 5279, 5441, 5501, 5639, 5741, 5849, 6131, 6269, 6449
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
lst={};Do[p0=Prime[n];p1=Prime[n+1];p2=Prime[n+2];If[p1>(p0+p2)/2,If[PrimeQ[p1*2+1],If[PrimeQ[p1+2],AppendTo[lst,p1]]]],{n,7!}];lst