reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
(Magma) [ n: n in [0..500] | IsPrime(7*n^2 + 1) ] ; // Vincenzo Librandi, Jan 31 2011
approved
editing
(MAGMAMagma) [ n: n in [0..500] | IsPrime(7*n^2 + 1) ] // Vincenzo Librandi, Jan 31 2011
editing
approved
(PARI) is(n)=isprime(7*n^2+1) \\ Charles R Greathouse IV, Jun 13 2017
approved
editing
editing
approved
Select[Range[300], PrimeQ[7*#^2 + 1] &] - _(* _Stefan Steinerberger_, Jan 02 2008 *)
(MAGMA) [ n: n in [0..500] | IsPrime(7*n^2 + 1) ] [From // _Vincenzo Librandi, _, Jan 31 2011]
approved
editing
Select[Range[300], PrimeQ[7*#^2 + 1] &] - _Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), _, Jan 02 2008
More terms from _Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), _, Jan 02 2008