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

1, 4, 5, 8, 10, 15, 18, 21, 24, 26, 29, 31, 35, 37, 41, 43, 47, 50, 53, 57, 60, 63, 66, 69, 72, 75, 78, 81, 84, 87, 90, 93, 95, 99, 101, 105, 107, 110, 113, 115, 119, 121, 125, 127, 131, 133

Offset

0,2

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}]]] &, {1, 4, 5}, Range[43]] (* Ivan Neretin, Mar 30 2017 *)

Crossrefs

Cf. A022424 and references therein.

Sequence in context: A319515 A139132 A295068 * A190394 A116050 A241413

Adjacent sequences: A022432 A022433 A022434 * A022436 A022437 A022438

Keyword

nonn

Author

Clark Kimberling

Status

approved