The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A063643

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

A063643

Primes with 2 representations: p*q - 2 = u*v + 2 where p, q, u and v are primes.
(history; published version)

#29 by OEIS Server at Mon Apr 01 13:27:40 EDT 2024

LINKS

Alois P. Heinz, <a href="/A063643/b063643_1.txt">Table of n, a(n) for n = 1..10000</a> (first 1000 term from T. D. Noe)

#28 by Alois P. Heinz at Mon Apr 01 13:27:40 EDT 2024

STATUS

editing

approved

Discussion

Mon Apr 01

13:27

OEIS Server: Installed new b-file as b063643.txt.  Old b-file is now b063643_1.txt.

#27 by Alois P. Heinz at Mon Apr 01 13:27:37 EDT 2024

LINKS

T. DAlois P. Noe, Heinz, <a href="/A063643/b063643_1.txt">Table of n, a(n) for n = 1..10000</a> (first 1000</a> term from T. D. Noe)

#26 by Alois P. Heinz at Mon Apr 01 13:21:41 EDT 2024

DATA

23, 37, 53, 67, 89, 113, 131, 157, 211, 251, 293, 307, 337, 379, 409, 449, 487, 491, 499, 503, 631, 683, 701, 719, 751, 769, 787, 919, 941, 953, 991, 1009, 1039, 1117, 1193, 1201, 1259, 1381, 1399, 1439, 1459, 1471, 1499, 1511, 1567, 1709, 1733, 1759, 1801

#25 by Alois P. Heinz at Mon Apr 01 13:20:45 EDT 2024

MAPLE

q:= p-> isprime(p) and map(numtheory[bigomega], {p-2, p+2})={2}:

select(q, [$2..2000])[]; # Alois P. Heinz, Apr 01 2024

STATUS

approved

editing

#24 by Michel Marcus at Sun Mar 03 03:45:10 EST 2019

STATUS

reviewed

approved

#23 by Joerg Arndt at Sun Mar 03 02:20:33 EST 2019

STATUS

proposed

reviewed

#22 by Jean-François Alcover at Sat Mar 02 05:29:28 EST 2019

STATUS

editing

proposed

#21 by Jean-François Alcover at Sat Mar 02 05:29:22 EST 2019

MATHEMATICA

Select[Prime[Range[300]], PrimeOmega[#+2] == PrimeOmega[#-2] == 2&] (* Jean-François Alcover, Mar 02 2019 *)

STATUS

approved

editing

#20 by Bruno Berselli at Thu Mar 26 05:02:59 EDT 2015

STATUS

reviewed

approved