login
A142406
Primes congruent to 25 mod 48.
1
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
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
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Jul 11 2008
STATUS
approved