A022439 a(n) = c(n-1) + c(n-3) where c is the sequence of numbers not in a.

2, 4, 5, 7, 11, 15, 18, 21, 23, 26, 29, 31, 35, 37, 41, 44, 47, 51, 53, 57, 60, 63, 66, 69, 72, 75, 78, 81, 83, 87, 89, 93, 95, 98, 101, 104, 107, 110, 113, 115, 119, 121, 125, 127, 131, 133

Offset

0,1

Links

Ivan Neretin, Table of n, a(n) for n = 0..10000

Mathematica

Fold[Append[#1, Plus @@ Complement[Range[Max@#1 + 3], #1][[{#2, #2 + 2}]]] &, {2, 4, 5}, Range[43]] (* Ivan Neretin, Mar 30 2017 *)

Crossrefs

Cf. A022424 and references therein.

Sequence in context: A097697 A035620 A363045 * A050134 A010065 A344654

Adjacent sequences: A022436 A022437 A022438 * A022440 A022441 A022442

Keyword

nonn

Author

Clark Kimberling

Status

approved