A142326 Primes congruent to 28 mod 45.

73, 163, 433, 523, 613, 883, 1063, 1153, 1423, 1693, 1783, 1873, 2053, 2143, 2503, 2593, 2683, 2953, 3313, 3583, 3673, 3853, 3943, 4483, 4663, 4933, 5023, 5113, 5563, 5653, 5743, 5923, 6373, 6553, 6733, 6823, 7723, 7993, 8263, 8353, 8443, 8623, 8713, 8803

Offset: 1

Author

N. J. A. Sloane, Jul 11 2008

Keywords

• nonn
• easy

Comments

Also, primes with digital root 1 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 28]; // Vincenzo Librandi, Aug 26 2012

Mathematica

Select[Prime[Range[1200]],MemberQ[{28},Mod[#,45]]&] (* Vincenzo Librandi, Aug 26 2012 *)
Select[Range[28,9000,45],PrimeQ] (* Harvey P. Dale, Aug 01 2024 *)

PARI

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