|
|
A084563
|
|
Even numbers having no more than three partitions into two odd primes.
|
|
2
|
|
|
2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26, 28, 30, 32, 38, 40, 44, 52, 56, 62, 68, 98, 128
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
There are no other terms <= 30000. Could it be that no other terms exist? - John W. Layman, Jul 28 2003
|
|
LINKS
|
|
|
MATHEMATICA
|
nn=10^2; ps=Boole[PrimeQ[Range[1, 2*nn, 2]]]; Select[Range[nn], Sum[ps[[i]]ps[[#-i+1]], {i, Ceiling[#/2]}]<=3&]*2 (* Jayanta Basu, May 25 2013 *)
p2Q[n_]:=Count[n-Prime[Range[2, PrimePi[n/2]]], _?PrimeQ]<4; Select[ 2*Range[70], p2Q] (* Harvey P. Dale, Apr 17 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|