[go: up one dir, main page]

login
Revision History for A266163 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Primes prime(k) such that (prime(k)*prime(k+1)+1)/2 is prime.
(history; published version)
#19 by Charles R Greathouse IV at Thu Sep 08 08:46:15 EDT 2022
PROG

(MAGMAMagma) [p: p in PrimesInInterval(3, 3*10^4) | IsPrime((p*NextPrime(p+1)+1) div 2)]; // Vincenzo Librandi, Dec 23 2015

Discussion
Thu Sep 08
08:46
OEIS Server: https://oeis.org/edit/global/2944
#18 by Harvey P. Dale at Fri Dec 25 10:28:00 EST 2015
STATUS

editing

approved

#17 by Harvey P. Dale at Fri Dec 25 10:27:54 EST 2015
COMMENTS

The next consecutive primes in this sequence are 134093 and 134129, 405541 and 405553, 432073 and 432097, 480803 and 480827, 586213 and 586237, ... - Harvey P. Dale, Dec 25 2015

#16 by Harvey P. Dale at Fri Dec 25 10:27:17 EST 2015
COMMENTS

The next consecutive primes in this sequence are 134093 and 134129, 405541 and 405553, 432073 and 432097, 480803 and 480827, 586213 and 586237, ... - Harvey P. Dale, Dec 25 2015

MATHEMATICA

Transpose[Select[Partition[Prime[Range[50000]], 2, 1], PrimeQ[ (Times@@#+1)/2]&]] [[1]] (* Harvey P. Dale, Dec 25 2015 *)

STATUS

approved

editing

#15 by Bruno Berselli at Wed Dec 23 03:13:56 EST 2015
STATUS

proposed

approved

#14 by Vincenzo Librandi at Wed Dec 23 03:02:32 EST 2015
STATUS

editing

proposed

#13 by Vincenzo Librandi at Wed Dec 23 03:02:19 EST 2015
PROG

(MAGMA) [p: p in PrimesInInterval(3, 3*10^4) | IsPrime((p*NextPrime(p+1)+1) div 2)]; // Vincenzo Librandi, Dec 23 2015

KEYWORD

nonn,newchanged

STATUS

approved

editing

#12 by Bruno Berselli at Wed Dec 23 02:57:16 EST 2015
STATUS

reviewed

approved

#11 by Joerg Arndt at Wed Dec 23 02:42:31 EST 2015
STATUS

proposed

reviewed

#10 by Michael De Vlieger at Tue Dec 22 18:32:53 EST 2015
STATUS

editing

proposed