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

1, 3, 6, 7, 12, 14, 18, 20, 23, 26, 29, 32, 35, 38, 41, 45, 47, 51, 53, 57, 59, 63, 65, 69, 71, 75, 77, 81, 83, 86, 89, 92, 95, 98, 101, 104, 107, 110, 113, 116, 119, 122, 125, 128, 131, 134

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, 3, 6}, Range[43]] (* Ivan Neretin, Mar 30 2017 *)

Crossrefs

Cf. A022424 and references therein.

Sequence in context: A077459 A048717 A175332 * A242666 A226228 A365422

Adjacent sequences: A022431 A022432 A022433 * A022435 A022436 A022437

Keyword

nonn

Author

Clark Kimberling

Status

approved