A132237 Primes congruent to {7, 23} mod 30.
7, 23, 37, 53, 67, 83, 97, 113, 127, 157, 173, 233, 263, 277, 293, 307, 337, 353, 367, 383, 397, 443, 457, 487, 503, 547, 563, 577, 593, 607, 653, 683, 727, 743, 757, 773, 787, 863, 877, 907, 937, 953, 967, 983, 997, 1013, 1087, 1103
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
- C. K. Caldwell, The Prime Pages.
- Omar E. Pol, Determinacion geometrica de los numeros primos y perfectos.
Programs
-
Magma
[ p: p in PrimesUpTo(1300) | p mod 30 in [7, 23] ]; // Vincenzo Librandi, Aug 14 2012
-
Mathematica
Select[Prime[Range[1000]],MemberQ[{7,23},Mod[#,30]]&] (* Vincenzo Librandi, Aug 14 2012 *)
-
PARI
is_A132237(n)=setsearch([7,23],n%30)&&isprime(n) \\ - M. F. Hasler, Nov 02 2013
Comments