login
A022950
a(n) = a(n-1) + c(n) for n >= 3, a( ) increasing, given a(1)=1 a(2)=7; where c( ) is complement of a( ).
1
1, 7, 11, 16, 22, 30, 39, 49, 61, 74, 88, 103, 120, 138, 157, 177, 198, 221, 245, 270, 296, 323, 351, 380, 411, 443, 476, 510, 545, 581, 618, 656, 696, 737, 779, 822, 866, 911, 957, 1004, 1052, 1102, 1153, 1205, 1258, 1312, 1367, 1423, 1480, 1538
OFFSET
1,2
LINKS
MATHEMATICA
Fold[Append[#1, #1[[-1]] + Complement[Range[Max@#1 + 3], #1][[#2]]] &, {1, 7}, Range[3, 50]] (* Ivan Neretin, Apr 05 2016 *)
CROSSREFS
Cf. A005228 and references therein.
Sequence in context: A284485 A089997 A129188 * A364442 A334456 A293343
KEYWORD
nonn
STATUS
approved