%I #11 Dec 26 2019 05:04:52
%S 5,17,29,59,137,179,227,269,419,809,1019,1049,1277,1289,1607,2129,
%T 2789,3359,3527,3917,4217,4229,4259,4637,4787,5009,5639,5867,6689,
%U 6779,6947,7547,8219,8999,9419,11057,11159,12239,13679,13709,13997,14549,17909
%N Near twin primes of order 12: twin primes p,p+2 such that p+12 and p+14 are primes.
%H Amiram Eldar, <a href="/A079292/b079292.txt">Table of n, a(n) for n = 1..10000</a>
%F Seq(d, n) = if(n prime & n+2 prime and n+d prime and n+d+2 prime) output n.
%e Seq(12,20) = 5 17 29 59. 5+2 = prime, 5+12 = prime, 5+14 = prime, 17+2 = prime 17+12 = prime, 17+14 = prime.
%t Select[Range[2*10^4], And @@ PrimeQ[# + {0, 2, 12, 14}] &] (* _Amiram Eldar_, Dec 26 2019 *)
%Y A007530 gives twin primes of order 6.
%K easy,nonn
%O 1,1
%A _Cino Hilliard_, Feb 08 2003
%E Offset corrected by _Amiram Eldar_, Dec 26 2019