|
| |
|
|
A064408
|
|
Even numbers not the sum of a pair of the greater of the twin primes.
|
|
0
| |
|
|
2, 4, 6, 8, 16, 22, 28, 30, 34, 40, 42, 46, 52, 54, 58, 60, 64, 70, 72, 76, 82, 84, 88, 90, 94, 96, 98, 100, 102, 106, 112, 118, 120, 124, 126, 130, 132, 136, 138, 142, 148, 150, 154, 160, 162, 166, 168, 172, 174, 178, 180, 184, 190, 192, 196
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| The greater of the twin primes < 200 are 5, 7, 13, 19, 31, 43, 61, 73, 103, 109, 139, 151, 181, 193, 199. 22 is in the above sequence because no combination of any two numbers from the set just enumerated can be summed to make 22.
|
|
|
MATHEMATICA
| q = Select[ Range[ 200 ], PrimeQ[ # - 2 ] && PrimeQ[ #2 ] & ]; Complement[ Table[ n, {n, 2, 200, 2} ], Union[ Flatten[ Table[ q[ [ i ] ] + q[ [ j ] ], {i, 1, Length[ q ] }, {j, 1, i} ] ] ] ]
|
|
|
CROSSREFS
| Sequence in context: A160560 A093109 A070034 * A100685 A068799 A100778
Adjacent sequences: A064405 A064406 A064407 * A064409 A064410 A064411
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 29 2001
|
| |
|
|
