|
| |
|
|
A115985
|
|
Positive n which are not the average of a run of at least 2 consecutive primes.
|
|
1
|
|
|
|
1, 2, 3, 7, 8, 10, 11, 13, 14, 16, 19, 20, 24, 25, 27, 28, 32, 33, 35, 36, 40, 41, 44, 48, 54, 57, 58, 59, 61, 62, 63, 65, 66, 67, 73, 74, 75, 80, 83, 84, 85, 88, 90, 94, 98, 103, 104, 109, 118, 119, 121, 128, 131, 136, 140, 141, 142, 146, 147, 148, 152, 156, 158
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Table of n, a(n) for n=1..63.
|
|
|
EXAMPLE
|
4=(3+5)/2, so 4 does not belong.
|
|
|
MATHEMATICA
|
With[{nn=400}, Select[Complement[Range[nn], Union[Flatten[ Table[ Select[Mean/@Partition[Prime[Range[PrimePi[nn]]], n, 1], IntegerQ], {n, 2, PrimePi[nn]}]]]], #<nn/2&]] (* From Harvey P. Dale, Apr 08 2012 *)
|
|
|
CROSSREFS
|
Cf. A060863, A115984.
Sequence in context: A105266 A054996 A129341 * A131210 A088340 A163517
Adjacent sequences: A115982 A115983 A115984 * A115986 A115987 A115988
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Giovanni Resta, Feb 10 2006
|
|
|
STATUS
|
approved
|
| |
|
|
