login
This site is supported by donations to The OEIS Foundation.

 

Logo

Annual Appeal: Please make a donation (tax deductible in USA) to keep the OEIS running. Over 5000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A109885 Let n be an even integer > 2. Let PrimeP be the number of prime partition pairs {p,q} corresponding to n such that n = p + q, p and q are prime and p <= q. Let CompP be the number of composite partition pairs {r,s} corresponding to n such that n = r + s, r is prime, s is composite and r <= s. For what n's is 2*PrimeP > CompP? 0
4, 10, 22, 24, 34, 36, 48, 54, 60, 66, 72, 78, 84, 90, 102, 114, 120, 126, 144, 150, 156, 168, 180, 186, 198, 204, 210, 240, 246, 252, 270, 294, 300, 324, 330, 360, 378, 390, 420, 450, 462, 480, 510, 540, 546, 570, 600, 630, 660, 690, 714, 720, 750, 780, 840 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Except for a(1), a(2) a(3) & a(5), a(n)==0 (mod 6). - Robert G. Wilson v

LINKS

Table of n, a(n) for n=1..55.

MATHEMATICA

fQ[n_] := Block[{t = n - Prime@Range@PrimePi[n/2]}, 2Length[Select[t, PrimeQ]] > Length[t]]; Select[ 2Range[2, 434], fQ[ # ] &] (* Robert G. Wilson v, Nov 03 2005 *)

CROSSREFS

Sequence in context: A053643 A111927 A227803 * A054211 A112770 A217514

Adjacent sequences:  A109882 A109883 A109884 * A109886 A109887 A109888

KEYWORD

nonn

AUTHOR

Gilmar Rodriguez Pierluissi (gilmarlily(AT)yahoo.com), Aug 31 2005

EXTENSIONS

Edited by Robert G. Wilson v, Nov 03 2005

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified December 9 00:24 EST 2016. Contains 278959 sequences.