|
| |
|
|
A083510
|
|
Members of A000124 which are the arithmetic mean of two other members.
|
|
0
| |
|
|
4, 22, 29, 37, 79, 106, 154, 172, 191, 211, 254, 326, 352, 379, 466, 529, 667, 704, 904, 947, 991, 1036, 1129, 1177, 1276, 1379, 1486, 1541, 1597, 1654, 1712, 1771, 1892, 1954, 2279, 2347, 2557, 2629, 2776, 2927, 3004, 3082, 3161, 3404, 3571, 3742, 3829
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 4 = (1+7)/2, 37 = (7 +67)/2. etc.
|
|
|
PROG
| (PARI) V = vector(5000); for (i = 1, 5000, V[i] = 1 + binomial(i, 2)); count = 0; i = 1; while (count < 50, i++; found = 0; j = i - 1; k = i + 1; x = 2*V[i]; while (!found && j, if (V[j] + V[k] > x, j--, if (V[j] + V[k] < x, k++, found = 1))); if (found, count++; print(V[i]))); (Wasserman)
|
|
|
CROSSREFS
| Cf. A000124.
Sequence in context: A204341 A036920 A036921 * A078647 A031108 A163484
Adjacent sequences: A083507 A083508 A083509 * A083511 A083512 A083513
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), May 05 2003
|
|
|
EXTENSIONS
| Corrected and extended by David Wasserman (wasserma(AT)spawar.navy.mil), Nov 18 2004
|
| |
|
|
