A154622 Primes p such that 67*p + 32 is also prime.
3, 5, 11, 17, 47, 53, 71, 113, 191, 227, 233, 281, 383, 431, 467, 521, 641, 653, 827, 863, 941, 971, 1031, 1061, 1181, 1187, 1223, 1367, 1433, 1481, 1487, 1667, 1697, 1811, 1823, 1877, 1901, 1913, 1997, 2027, 2081, 2087, 2213, 2237, 2357, 2411, 2417, 2447
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A154621.
Programs
-
Magma
[p: p in PrimesUpTo(2500)| IsPrime(67*p + 32)]; // Vincenzo Librandi, Oct 30 2012
-
Mathematica
Select[Prime[Range[2500]], PrimeQ[67*# + 32]&] (* Vincenzo Librandi, Oct 30 2012 *)
Comments