login

Revision History for A132190

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Numbers n such that 7*n^2 + 1 is prime.
(history; published version)
#15 by Michael De Vlieger at Sun Sep 08 19:26:21 EDT 2024
STATUS

reviewed

approved

#14 by Andrew Howroyd at Sun Sep 08 18:40:34 EDT 2024
STATUS

proposed

reviewed

#13 by Robert C. Lyons at Sun Sep 08 18:39:57 EDT 2024
STATUS

editing

proposed

#12 by Robert C. Lyons at Sun Sep 08 18:39:56 EDT 2024
PROG

(Magma) [ n: n in [0..500] | IsPrime(7*n^2 + 1) ] ; // Vincenzo Librandi, Jan 31 2011

STATUS

approved

editing

#11 by Charles R Greathouse IV at Thu Sep 08 08:45:31 EDT 2022
PROG

(MAGMAMagma) [ n: n in [0..500] | IsPrime(7*n^2 + 1) ] // Vincenzo Librandi, Jan 31 2011

Discussion
Thu Sep 08
08:45
OEIS Server: https://oeis.org/edit/global/2944
#10 by Charles R Greathouse IV at Tue Jun 13 10:16:27 EDT 2017
STATUS

editing

approved

#9 by Charles R Greathouse IV at Tue Jun 13 10:16:23 EDT 2017
PROG

(PARI) is(n)=isprime(7*n^2+1) \\ Charles R Greathouse IV, Jun 13 2017

STATUS

approved

editing

#8 by Jon E. Schoenfield at Wed Sep 16 13:53:32 EDT 2015
STATUS

editing

approved

#7 by Jon E. Schoenfield at Wed Sep 16 13:53:31 EDT 2015
MATHEMATICA

Select[Range[300], PrimeQ[7*#^2 + 1] &] - _(* _Stefan Steinerberger_, Jan 02 2008 *)

PROG

(MAGMA) [ n: n in [0..500] | IsPrime(7*n^2 + 1) ] [From // _Vincenzo Librandi, _, Jan 31 2011]

STATUS

approved

editing

#6 by Russ Cox at Fri Mar 30 18:49:46 EDT 2012
MATHEMATICA

Select[Range[300], PrimeQ[7*#^2 + 1] &] - _Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), _, Jan 02 2008

EXTENSIONS

More terms from _Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), _, Jan 02 2008

Discussion
Fri Mar 30
18:49
OEIS Server: https://oeis.org/edit/global/238