|
|
A118026
|
|
a(0) = 0, a(n) = a(n-1) + (largest integer which is <= n and is missing from the earlier terms of the sequence).
|
|
5
|
|
|
0, 1, 3, 5, 9, 13, 19, 26, 34, 42, 52, 63, 75, 87, 101, 116, 132, 149, 167, 185, 205, 226, 248, 271, 295, 320, 345, 372, 400, 429, 459, 490, 522, 555, 588, 623, 659, 696, 734, 773, 813, 854, 895, 938, 982, 1027, 1073, 1120, 1168, 1217, 1267, 1318, 1369, 1422
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
MATHEMATICA
|
a = {1}; Do[AppendTo[a, a[[i - 1]] + SelectFirst[Reverse@ Range[i], FreeQ[a, #] &]], {i, 2, 53}]; {0}~Join~a (* Michael De Vlieger, Sep 16 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
More terms from Sheedeh Dorri (spd145(AT)psu.edu) and Melissa Donovan (msd181(AT)psu.edu), Apr 18 2006
|
|
STATUS
|
approved
|
|
|
|