OFFSET
1,1
COMMENTS
Primes of the form 6+A014574(k)/6, any k.
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1100
EXAMPLE
MATHEMATICA
f1[n_]:=If[PrimeQ[n-1]&&PrimeQ[n+1], True, False]; f2[n_]:=If[f1[n]&&PrimeQ[n/ 6+6], True, False]; lst={}; Do[If[f2[n], AppendTo[lst, n/6+6]], {n, 8!}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jul 25 2009
EXTENSIONS
Definition rephrased, reference to A014574 added by R. J. Mathar, Aug 02 2009
STATUS
approved