%I #16 May 28 2018 09:42:00
%S 13,19,31,43,67,79,103,139,223,283,367,439,499,607,619,643,787,823,
%T 907,1039,1087,1399,1447,1543,1579,1627,1663,1699,1759,1867,1879,1987,
%U 2083,2203,2239,2383,2659,2767,2803,3019,3343,3463,3559,3607,3643,3847,3919
%N Primes of the form 6*p + 1 where p is also prime.
%C Analogous to A005385; can be called 6-safe primes.
%H Vincenzo Librandi, <a href="/A051644/b051644.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = 6*A007693(n) + 1.
%e 103 is in the sequence because both 17 and 6*17 + 1 = 103 are primes.
%t Select[1 + 6Prime@Range[120], PrimeQ] (* _Ray Chandler_, Mar 14 2007 *)
%Y Cf. A005384, A005385, A002476, A007693, A016921, A024899, A091178.
%K nonn
%O 1,1
%A _Labos Elemer_
%E Edited, corrected and extended by _Ray Chandler_, Mar 14 2007