A023227 Primes p such that 7*p + 10 is also prime.

3, 7, 13, 31, 37, 43, 67, 73, 79, 109, 139, 157, 163, 181, 193, 211, 223, 229, 241, 271, 277, 367, 373, 379, 397, 421, 433, 439, 457, 463, 523, 541, 571, 577, 601, 607, 661, 673, 709, 727, 757, 769, 787, 829, 853, 907, 937, 967, 991, 1039, 1063, 1117, 1153, 1213

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

Select[Prime@Range@500, PrimeQ[7 # + 10] &] (* Vincenzo Librandi, May 19 2014 *)

Prog

(Magma) [n: n in [0..1000] | IsPrime(n) and IsPrime(7*n+10)]; // Vincenzo Librandi, Nov 20 2010

Crossrefs

Sequence in context: A330835 A249378 A136060 * A031157 A049488 A136051

Adjacent sequences: A023224 A023225 A023226 * A023228 A023229 A023230

Keyword

nonn,easy

Author

David W. Wilson

Status

approved