

A118028


a(0)=1. a(n) = a(n1) + (smallest integer which is >= n and is missing from the earlier terms of the sequence).


5



1, 3, 5, 9, 13, 19, 25, 32, 40, 50, 60, 71, 83, 97, 111, 126, 142, 159, 177, 197, 217, 238, 260, 283, 307, 333, 359, 386, 414, 443, 473, 504, 537, 570, 604, 639, 675, 712, 750, 789, 830, 871, 913, 956, 1000, 1045, 1091, 1138, 1186, 1235, 1286, 1337, 1389, 1442
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,2


LINKS

Michael De Vlieger, Table of n, a(n) for n = 0..1000


MATHEMATICA

a = {1}; Do[k = 2; While[Nand[FreeQ[a, k], k >= i], k++]; AppendTo[a, a[[i]] + k], {i, 53}]; a (* Michael De Vlieger, Sep 19 2017 *)


CROSSREFS

Cf. A118026, A118027, A118029, A118030, A094589.
Sequence in context: A207187 A065802 A245302 * A209974 A099392 A080827
Adjacent sequences: A118025 A118026 A118027 * A118029 A118030 A118031


KEYWORD

easy,nonn


AUTHOR

Leroy Quet, Apr 10 2006


EXTENSIONS

More terms from Joshua Zucker, Jul 27 2006


STATUS

approved



