A212374 Primes congruent to 1 mod 23.

47, 139, 277, 461, 599, 691, 829, 967, 1013, 1151, 1289, 1381, 1427, 1657, 1933, 1979, 2347, 2393, 2531, 3037, 3083, 3221, 3313, 3359, 3727, 3911, 4003, 4049, 4463, 4831, 4877, 4969, 5107, 5153, 5521, 5659, 5843, 5981, 6073, 6211, 6257, 6763, 6947, 7039, 7177

Offset: 1

Author

Bruno Berselli, Sep 12 2012

Keywords

• nonn
• easy

Comments

This sequence is not the same as A040984. First disagreement at index 34: a(34)=5153, A040984(34)=5521.

Links

• Bruno Berselli, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A100201, A102734, A141908-A141926, A040984.

Programs

Magma

[p: p in PrimesUpTo(7200) | p mod 23 eq 1];

Maple

select(p->irem(p, 23)=1, [ithprime(i)$i=1..1000])[]; # Alois P. Heinz, Sep 12 2012

Mathematica

Select[Prime[Range[1000]], Mod[#, 23] == 1 &]
Select[Range[1,7200,23],PrimeQ] (* Harvey P. Dale, Jul 02 2018 *)

PARI

is(n)=isprime(n) && n%23==1 \\ Charles R Greathouse IV, Jul 03 2016

Formula

a(n) ~ 22n log n. - Charles R Greathouse IV, Jul 03 2016