A096455 Primes p such that the number of primes q, 7 <= q < p, congruent to 1 or 2 mod 5, is two more than the number of such primes congruent to 3 or 4 mod 5.

13, 19, 43, 53, 71, 79, 139, 163, 173, 193, 199, 223, 229, 263, 281, 293, 311, 317, 383, 409, 433, 593, 613, 619, 641, 647, 659, 673, 683, 701, 719, 733, 769, 809, 821, 827, 839, 911, 929, 941, 1151, 1163, 1181, 1231, 1277, 1283, 1301, 1307, 1321, 1439, 1451

Offset: 1

Author

Yasutoshi Kohmoto, Aug 12 2004

Keywords

• nonn
• easy

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A096447-A096454.

Programs

Mathematica

Prime[#+4]&/@Flatten[Position[Accumulate[Table[Which[Mod[n,5] == 1,1,Mod[ n,5] == 2,1,Mod[ n,5] == 3,-1,Mod[n,5]==4,-1],{n,Prime[ Range[ 4,250]]}]],2]] (* Harvey P. Dale, Aug 29 2021 *)

Extensions

More terms and better definition from Joshua Zucker, May 21 2006