%I
%S 37,61,157,229,277,349,373,709,733,853,877,997,1069,1213,1237,1669,
%T 1789,2293,2389,2677,2749,2797,3229,3253,3373,3517,3733,4549,4597,
%U 4813,4909,5197,5557,5749,6037,6277,6829,7213,7573,7717,7933,8293,8629,9013,9133
%N Primes p such that (p  1)/12 is also prime.
%H Vincenzo Librandi, <a href="/A158018/b158018.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n)=12*A075704(n)+1. [From _R. J. Mathar_, Mar 15 2009]
%t Flatten[Table[If[PrimeQ[n] && PrimeQ[(n  1)/12], n, {}], {n, 1, 10000}]]
%t Select[Prime[Range[1500]], PrimeQ[(#  1) / 12]&] (* _Vincenzo Librandi_, Apr 14 2013 *)
%Y Cf. A005385, A090866, A051644, A055781
%K nonn,easy
%O 1,1
%A _Roger L. Bagula_, Mar 11 2009
%E Definition slightly rephrased  The Assoc. Eds. of the OEIS, Aug 30 2010
