Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
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
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.
Sequence in context: A375029 A260385 A355149 * A370593 A241822 A133732
KEYWORD
nonn
STATUS
approved