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,1

Links

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

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 *)

Crossrefs

Cf. A096447-A096454.

Sequence in context: A029478 A252021 A216101 * A124199 A119869 A272200

Adjacent sequences: A096452 A096453 A096454 * A096456 A096457 A096458

Keyword

nonn,easy

Author

Yasutoshi Kohmoto, Aug 12 2004

Extensions

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

Status

approved