PROG
(MAGMAMagma) [n: n in [0..200] | IsPrime(13*n^2+3*n+1)]; // Vincenzo Librandi, Sep 24 2012
(MAGMAMagma) [n: n in [0..200] | IsPrime(13*n^2+3*n+1)]; // Vincenzo Librandi, Sep 24 2012
editing
approved
(PARI) is(n)=isprime(13*n^2+3*n+1) \\ Charles R Greathouse IV, May 22 2017
approved
editing
Select[Range[200], PrimeQ[13#^2+3#+1]&] (* From _Harvey P. Dale, _, Dec 08 2011 *)
proposed
approved
editing
proposed
Definition corrected and terms recomputed by _Jon E. Schoenfield _ and N. J. A. Sloane, Jun 16 2010
approved
editing
Definition corrected and terms recomputed by Jon Schoenfield and _N. J. A. Sloane, _, Jun 16 2010
proposed
approved
editing
proposed