OFFSET
1,3
EXAMPLE
10*0 + 3 = 3 and 10*0 + 7 = 7 are prime, hence 0 is a term; 10*10 + 3 = 103 and 10*10 + 7 = 107 are prime, hence 10 is a term.
MATHEMATICA
f1[n_]:=10*n+3; f2[n_]:=10*n+7; lst={}; Do[p1=f1[n]; p2=f2[n]; If[PrimeQ[p1]&&PrimeQ[p2], AppendTo[lst, n]], {n, 0, 2*6!}]; lst
Select[Range[0, 1000], And@@PrimeQ[10#+{3, 7}]&] (* Harvey P. Dale, May 11 2014 *)
PROG
(Magma) [ n: n in [0..760] | IsPrime(10*n+3) and IsPrime(10*n+7) ]; // Klaus Brockhaus, Jul 07 2009
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jul 02 2009
EXTENSIONS
Edited and listed terms verified by Klaus Brockhaus, Jul 07 2009
STATUS
approved