A142332 Primes congruent to 38 mod 45.

83, 173, 263, 353, 443, 983, 1163, 1433, 1523, 1613, 1973, 2063, 2153, 2243, 2333, 2423, 2693, 2963, 3323, 3413, 3593, 3863, 4133, 4493, 4583, 4673, 4943, 5303, 5393, 5483, 5573, 5843, 6113, 6203, 6473, 6563, 6653, 6833, 7013, 7103, 7193, 7283, 7643, 7823

Offset: 1

Author

N. J. A. Sloane, Jul 11 2008

Keywords

• nonn
• easy

Comments

Also primes with digital root 2 and last digit 3. - J. W. Helkenberg, Oct 27 2011

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000040.

Programs

Magma

[p: p in PrimesUpTo(10000) | p mod 45 eq 38]; // Vincenzo Librandi, Aug 26 2012

Mathematica

Select[Prime[Range[1200]],MemberQ[{38},Mod[#,45]]&] (* Vincenzo Librandi, Aug 26 2012 *)
Select[Range[38,8000,45],PrimeQ] (* Harvey P. Dale, Aug 10 2020 *)

PARI

forprime(p=2,1e4,if(p%45==38,print1(p", "))) \\ Charles R Greathouse IV, Oct 31 2011