A142519 Primes congruent to 25 mod 52.

181, 233, 337, 389, 701, 857, 1013, 1117, 1429, 1481, 1637, 1741, 1949, 2053, 2417, 2521, 2677, 2729, 2833, 3041, 3301, 3457, 3613, 3769, 3821, 4133, 4289, 4549, 4861, 5381, 5641, 5693, 5849, 5953, 6317, 6421, 6473, 6577, 6733, 7253, 7669, 7877, 8293, 8501

Offset

1,1

Links

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

Formula

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

Mathematica

Select[Prime[Range[1300]], MemberQ[{25}, Mod[#, 52]] &] (* Vincenzo Librandi, Aug 29 2012 *)
Select[Range[25, 8600, 52], PrimeQ] (* Harvey P. Dale, Aug 07 2017 *)

Prog

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

Crossrefs

Cf. A000040.

Sequence in context: A224614 A216309 A139648 * A053140 A330366 A107694

Adjacent sequences: A142516 A142517 A142518 * A142520 A142521 A142522

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved