%I #5 Jan 14 2020 20:22:32
%S 18,42,66,282,618,1374,1698,2022,2766,2778,2874,3594,3918,5718,6918,
%T 7734,9138,9582,9726,10806,11334,11442,14226,14394,14802,15306,16386,
%U 17994,20226,20334,21954,25374,27366,27822
%N Numbers n such that n/6 and prime(n)+/-n are all primes.
%H Harvey P. Dale, <a href="/A105550/b105550.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[6,30000,6],AllTrue[{#/6,Prime[#]+#,Prime[#]-#},PrimeQ]&] (* _Harvey P. Dale_, Jan 14 2020 *)
%Y Cf. A064403.
%K nonn
%O 1,1
%A _Zak Seidov_, May 03 2005