BBC Russian

Revision History for A124186

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A124186

Numbers n such that 1 + n + n^3 + n^5 + n^7 + n^9 + n^11 + ... + n^27 + n^29 + n^31 is prime.
(history; published version)

#29 by Charles R Greathouse IV at Thu Sep 08 08:45:28 EDT 2022

PROG

(MAGMAMagma) [n: n in [0..5000] | IsPrime(s) where s is 1+&+[n^i: i in [1..31 by 2]]]; // Vincenzo Librandi, Jun 28 2014

Discussion

Thu Sep 08

08:45

OEIS Server: https://oeis.org/edit/global/2944

#28 by Bruno Berselli at Sat Jun 28 03:01:56 EDT 2014

STATUS

editing

approved

#27 by Bruno Berselli at Sat Jun 28 03:01:30 EDT 2014

PROG

(Sage)

i, n = var('i, n')

[n for n in (1..3100) if is_prime(1+(n^(2*i+1)).sum(i, 0, 15))] # Bruno Berselli, Jun 28 2014

STATUS

approved

editing

#26 by Joerg Arndt at Sat Jun 28 02:54:45 EDT 2014

STATUS

reviewed

approved

#25 by Michel Marcus at Sat Jun 28 02:25:00 EDT 2014

STATUS

proposed

reviewed

#24 by Vincenzo Librandi at Sat Jun 28 01:45:52 EDT 2014

STATUS

editing

proposed

#23 by Vincenzo Librandi at Sat Jun 28 01:45:47 EDT 2014

CROSSREFS

Cf. A049407, similar sequences listed in A244376.

STATUS

proposed

editing

#22 by Vincenzo Librandi at Sat Jun 28 01:31:19 EDT 2014

STATUS

editing

proposed

#21 by Vincenzo Librandi at Sat Jun 28 01:31:05 EDT 2014

MATHEMATICA

Select[Range[4000], PrimeQ[Total[#^Range[1, 31, 2]] + 1] &] (* Vincenzo Librandi, Jun 28 2014 *)

PROG

(MAGMA) [n: n in [0..5000] | IsPrime(s) where s is 1+&+[n^i: i in [1..31 by 2]]]; // Vincenzo Librandi, Jun 28 2014

KEYWORD

nonn,easy,changed

STATUS

approved

editing

#20 by Bruno Berselli at Wed Jun 25 10:38:14 EDT 2014

STATUS

editing

approved