|
|
A092109
|
|
Primes p such that p+3 is a semiprime.
|
|
27
|
|
|
3, 7, 11, 19, 23, 31, 43, 59, 71, 79, 83, 103, 131, 139, 163, 191, 199, 211, 223, 251, 271, 311, 331, 359, 379, 383, 419, 443, 463, 479, 499, 523, 563, 619, 631, 659, 691, 743, 839, 859, 863, 883, 911, 919, 971, 1039, 1091, 1123, 1151, 1171, 1223, 1231, 1259
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Primes p such that p-3 is semiprime are in A089531; p and 2p+3 both prime, A023204; p, 2p-3 and 2p+3 prime, A092110.
Primes p such that (p+3)/2 is prime. All these primes are congruent to 3 mod 4. - Artur Jasinski, Oct 11 2008
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
select(p -> isprime(p) and isprime((p+3)/2), [seq(2*k+1, k=1..1000)]); # Robert Israel, Mar 29 2015
|
|
MATHEMATICA
|
aa = {}; k = 3; Do[If[PrimeQ[(k + Prime[n])/2], AppendTo[aa, Prime[n]]], {n, 1, 100}]; aa (* Artur Jasinski, Oct 11 2008 *)
Select[Prime[Range[300]], PrimeOmega[#+3]==2&] (* Harvey P. Dale, Feb 07 2018 *)
|
|
PROG
|
(Magma) IsSemiprime:=func< p | &+[ k[2]: k in Factorization(p)] eq 2 >; [p: p in PrimesUpTo(1300)| IsSemiprime(p+3)]; // Vincenzo Librandi, Feb 21 2014
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|