%I #6 Mar 30 2017 04:49:05
%S 1,3,5,8,11,15,17,21,23,26,29,32,35,38,41,44,47,51,53,57,59,63,65,69,
%T 71,75,77,81,83,87,89,93,95,98,101,104,107,110,113,116,119,122,125,
%U 128,131,134
%N a(n) = c(n-1) + c(n-3) where c is the sequence of numbers not in a.
%H Ivan Neretin, <a href="/A022433/b022433.txt">Table of n, a(n) for n = 0..10000</a>
%t Fold[Append[#1, Plus @@ Complement[Range[Max@#1 + 3], #1][[{#2, #2 + 2}]]] &, {1, 3, 5}, Range[43]] (* _Ivan Neretin_, Mar 30 2017 *)
%Y Cf. A022424 and references therein.
%K nonn
%O 0,2
%A _Clark Kimberling_