OFFSET
1,1
COMMENTS
Let k be an even integer. Let PrimeP be the set of prime partition points {p,q} such that p + q = k, p and q are prime and p <= q. Let CompP be the set of composite partition points {p,q} such that p + q = k, p is prime, q is composite and p <= q. Sequence gives value of k such that the size of the two sets PrimeP and CompP are equal.
EXAMPLE
The number k = 30 is included because the two sets PrimeP={{7,23},{11,19},{13,17}} and CompP={{2,28},{3,27},{5,25}} have the same number of elements.
PROG
(PARI)
d(n)={my(s=0); forprime(p=2, n, s+=if(isprime(2*n-p), 1, -1)); s}
{ for(n=1, 10^4/2, if(d(n)==0, print1(2*n, ", "))) } \\ Andrew Howroyd, Jan 02 2020
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Gilmar Rodriguez Pierluissi (gilmarlily(AT)yahoo.com), Aug 26 2005
EXTENSIONS
Name edited and a(13)-a(20) from Andrew Howroyd, Jan 02 2020
STATUS
approved