A142787 Primes congruent to 13 mod 60.
13, 73, 193, 313, 373, 433, 613, 673, 733, 853, 1033, 1093, 1153, 1213, 1453, 1693, 1753, 1873, 1933, 1993, 2053, 2113, 2293, 2473, 2593, 2713, 2833, 2953, 3253, 3313, 3373, 3433, 3613, 3673, 3733, 3793, 3853, 4093, 4153, 4273, 4513, 4813, 4933, 4993, 5113
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A000040.
Programs
-
Magma
[p: p in PrimesUpTo(6000) | p mod 60 eq 13 ]; // Vincenzo Librandi, Sep 04 2012
-
Mathematica
Select[Prime[Range[800]], MemberQ[{13}, Mod[#, 60]] &] (* Vincenzo Librandi, Sep 04 2012 *)
-
PARI
is(n)=isprime(n) && n%60==13 \\ Charles R Greathouse IV, Jul 03 2016
Formula
a(n) ~ 16n log n. - Charles R Greathouse IV, Jul 03 2016