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

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

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

Prog

(PARI) forprime(p=2, 1e4, if(p%45==28, print1(p", "))) \\ Charles R Greathouse IV, Oct 31 2011
(Magma) [p: p in PrimesUpTo(10000) | p mod 45 eq 28]; // Vincenzo Librandi, Aug 26 2012

Crossrefs

Cf. A000040.

Sequence in context: A248399 A071844 A078856 * A142377 A044405 A044786

Adjacent sequences: A142323 A142324 A142325 * A142327 A142328 A142329

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved