A023211 Primes p such that 3*p + 10 is also prime.
3, 7, 11, 17, 19, 23, 29, 31, 43, 47, 61, 67, 71, 73, 89, 101, 107, 109, 113, 137, 149, 151, 163, 179, 197, 199, 211, 227, 233, 239, 241, 271, 281, 283, 337, 347, 353, 359, 373, 397, 401, 409, 431, 439, 457, 463, 479, 487, 491, 523, 563, 571, 577, 593, 607, 617, 619, 641
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[n: n in [0..1000] | IsPrime(n) and IsPrime(3*n+10)]; // Vincenzo Librandi, Nov 20 2010
-
Mathematica
Select[Prime@Range@500, PrimeQ[3 # + 10] &] (* Vincenzo Librandi, May 19 2014 *)