|
Search: id:A099988
|
|
| |
|
| 1, 7, 13, 21, 31, 37, 49, 63, 69, 75, 87, 99, 111, 127, 133, 141, 159, 169, 189, 195, 205, 219, 231, 237, 259, 267, 283, 289, 303, 319, 327, 339, 357, 367, 391, 399, 415, 427, 433, 463, 477, 487, 495, 517, 529, 537, 553, 577, 583, 601, 615, 621, 639, 645, 655
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
lst = Range[1, 678, 2]; i = 2; While[ i <= (len = Length@lst) && (k = lst[[i]]) <= len, lst = Drop[lst, {k, len, k}]; i++ ]; Take[lst, {1, Length@lst, 2}] - Robert G. Wilson v (rgwv(at)rgwv.com), May 12 2006
|
|
CROSSREFS
|
Cf. A099989.
Sequence in context: A157971 A135275 A013652 this_sequence A076947 A124192 A034102
Adjacent sequences: A099985 A099986 A099987 this_sequence A099989 A099990 A099991
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
N. J. A. Sloane (njas(AT)research.att.com), Nov 20 2004
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(at)rgwv.com), May 12 2006
|
|
|
Search completed in 0.002 seconds
|
