login
A022947
a(n) = a(n-1) + c(n) for n >= 3, a( ) increasing, given a(1)=1 a(2)=3; where c( ) is complement of a( ).
2
1, 3, 8, 14, 21, 30, 40, 51, 63, 76, 91, 107, 124, 142, 161, 181, 203, 226, 250, 275, 301, 328, 356, 385, 416, 448, 481, 515, 550, 586, 623, 661, 700, 741, 783, 826, 870, 915, 961, 1008, 1056, 1105, 1155, 1207, 1260, 1314, 1369, 1425, 1482, 1540
OFFSET
1,2
LINKS
MATHEMATICA
Fold[Append[#1, #1[[-1]] + Complement[Range[Max@#1 + 3], #1][[#2]]] &, {1, 3}, Range[3, 50]] (* Ivan Neretin, Apr 05 2016 *)
CROSSREFS
Cf. A005228 and references therein.
Sequence in context: A219930 A333962 A366087 * A098762 A014848 A140479
KEYWORD
nonn
STATUS
approved