A142406 Primes congruent to 25 mod 48.

73, 313, 409, 457, 601, 937, 1033, 1129, 1321, 1609, 1657, 1753, 1801, 1993, 2089, 2137, 2281, 2377, 2473, 2521, 2617, 2713, 2857, 2953, 3001, 3049, 3433, 3529, 3673, 3769, 4057, 4153, 4201, 4297, 4441, 4729, 4969, 5113, 5209, 5449, 5641, 5689, 5737, 5881

Offset

1,1

Links

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

Formula

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

Mathematica

Select[Prime[Range[1000]], MemberQ[{25}, Mod[#, 48]] &] (* Vincenzo Librandi, Aug 27 2012 *)
Select[Range[25, 5900, 48], PrimeQ] (* Harvey P. Dale, Mar 25 2013 *)

Prog

(Magma) [p: p in PrimesUpTo(6000) | p mod 48 eq 25]; // Vincenzo Librandi, Aug 27 2012
(PARI) is(n)=isprime(n) && n%48==25 \\ Charles R Greathouse IV, Jul 03 2016

Crossrefs

Cf. A000040.

Sequence in context: A142614 A158744 A297430 * A005108 A142810 A142279

Adjacent sequences: A142403 A142404 A142405 * A142407 A142408 A142409

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved