A023210 Primes p such that 3*p + 8 is also prime.
3, 5, 7, 11, 13, 17, 31, 41, 43, 47, 53, 61, 73, 83, 101, 103, 113, 127, 131, 137, 151, 157, 167, 193, 197, 211, 223, 251, 263, 271, 277, 283, 293, 307, 311, 313, 337, 347, 367, 431, 433, 467, 491, 521, 563, 571, 593, 601, 613, 631, 641, 647, 673, 677, 691, 701, 733, 743
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+8)]; // Vincenzo Librandi, Nov 20 2010
-
Mathematica
Select[Prime@Range@500, PrimeQ[3 # + 8] &] (* Vincenzo Librandi, May 19 2014 *)