OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
FORMULA
a(n)=12*A075704(n)+1. [From R. J. Mathar, Mar 15 2009]
MATHEMATICA
Flatten[Table[If[PrimeQ[n] && PrimeQ[(n - 1)/12], n, {}], {n, 1, 10000}]]
Select[Prime[Range[1500]], PrimeQ[(# - 1) / 12]&] (* Vincenzo Librandi, Apr 14 2013 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Mar 11 2009
EXTENSIONS
Definition slightly rephrased - The Assoc. Eds. of the OEIS, Aug 30 2010
STATUS
approved