OFFSET
1,2
EXAMPLE
19*1-2=17, 19*7-2=131, 19*15-2=283, ...
MATHEMATICA
a={}; Do[x=19*n-2; If[PrimeQ[x], AppendTo[a, n]], {n, 10^2}]; a
Select[Range[400], PrimeQ[19#-2]&] (* Harvey P. Dale, Aug 22 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, May 15 2008
EXTENSIONS
More terms from Harvey P. Dale, Aug 22 2017
STATUS
approved