|
|
A022944
|
|
a(n) = a(n-2) + c(n-1) for n >= 3, a( ) increasing, given a(1)=2, a(2)=4; where c( ) is complement of a( ).
|
|
2
|
|
|
2, 4, 5, 10, 12, 18, 21, 29, 34, 43, 49, 59, 66, 78, 86, 100, 109, 124, 134, 150, 161, 178, 191, 209, 223, 242, 258, 278, 295, 316, 334, 356, 375, 398, 419, 443, 465, 490, 513, 540, 564, 592, 617, 646, 672, 702, 729, 760, 789, 821, 851, 884, 915
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Fold[Append[#1, #1[[-2]] + Complement[Range[Max@#1 + 2], #1][[#2]]] &, {2, 4}, Range[2, 52]] (* Ivan Neretin, Apr 05 2016 *)
|
|
CROSSREFS
|
Cf. A005228 and references therein.
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|