OFFSET
1,2
MATHEMATICA
Select[Range[850], PrimeQ[3# + 4] && PrimeQ[4# + 3] &] (* Ray Chandler, May 11 2007 *)
PROG
(Magma) [n: n in [0..1000] | IsPrime(3*n+4) and IsPrime(4*n+3)] // Vincenzo Librandi, Mar 26 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Nov 10 2006
STATUS
approved