|
|
A123986
|
|
Numbers n for which 4n+1 and 4n+3 are primes.
|
|
9
|
|
|
1, 4, 7, 10, 25, 34, 37, 49, 67, 70, 115, 130, 142, 154, 160, 202, 205, 214, 220, 262, 265, 307, 319, 322, 325, 370, 424, 430, 469, 487, 499, 520, 532, 535, 559, 577, 595, 637, 664, 682, 697, 700, 742, 814, 832, 847, 865, 889, 895, 955, 979, 982, 1000, 1012, 1039
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1100], And @@ PrimeQ /@ ({1, 3} + 4#) &] (* Ray Chandler, Nov 05 2006 *)
nn=10000; k=0; x=1; re=Reap[While[k<nn-.1, If[PrimeQ[1+4x]&&PrimeQ[3+4x], Sow[x]; k++]; x=x+3]][[2, 1]] (* Zak Seidov, Dec 02 2011 *)
|
|
PROG
|
(Magma) [n: n in [0..1100] |IsPrime(4*n+1) and IsPrime(4*n+3)]; // Vincenzo Librandi, Feb 01 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|