A022424 - OEIS

A022424

Solution a( ) of the complementary equation a(n) = b(n-1) + b(n-2), where a(0) = 1, a(1) = 2; see Comments.

%I #41 Feb 20 2019 18:04:01

%S 1,2,7,9,11,14,18,22,25,28,31,33,36,39,41,44,47,50,53,56,59,62,66,69,

%T 72,75,78,82,85,88,91,94,97,100,103,106,109,112,115,118,121,124,127,

%U 129,132,135,138,141,144,147,150,153,156,159,161,164,167,170

%N Solution a( ) of the complementary equation a(n) = b(n-1) + b(n-2), where a(0) = 1, a(1) = 2; see Comments.

%C From the Bode-Harborth-Kimberling link:

%C a(n) = b(n-1) + b(n-2) for n > 2;

%C b(0) = least positive integer not in {a(0),a(1)};

%C b(n) = least positive integer not in {a(0),...,a(n),b(0),...,b(n-1)} for n > 1.

%C Note that (b(n)) is strictly increasing and is the complement of (a(n)).

%C ***

%C In the following guide to solutions a( ) and b( ) of a(n) = b(n-1) + b(n-2), an asterisk (*) indicates that a( ) differs from the indicated A-sequence in one or two initial terms:

%C (a(n)) (b(n)) a(0) a(1)

%C A022424 A055563 1 2

%C A022425 A299407 1 4

%C A022441* A055562 1 5

%C A022426 A299411 2 3

%C A022442* A099467* 2 4

%C A299416 A299417 3 4

%C A299418 A299419 3 5

%C A299420 A299421 4 5

%C A022441* A055562 1 1

%C ***

%C Guide to solutions a( ) and b( ) of a(n) = b(n-1) + b(n-2) + b(n-3) for various initial values:

%C (a(n)) (b(n)) a(0) a(1) a(2)

%C A299486 A299487 1 2 3

%C A299488 A299489 1 2 4

%C A299490 A299491 1 3 5

%C A299492 A299492 2 4 5

%C A299494 A299493 2 4 6

%C A299496 A299494 3 4 5

%C ***

%C Guide to other complementary equations:

%C A022427-A022440: a(n) = b(n-1) + b(n-3)

%C A299531-A299532: a(n) = 2*b(n-1) + b(n-2), a(0) = 1, a(1) = 2

%C A296220, A299534: a(n) = b(n-1) + 2*b(n-2), a(0) = 1, a(1) = 2

%C A022437, A299536: a(n) = b(n-1) + b(n-3), a(0) = 1, a(1) = 2, a(2) = 3

%C A022437, A299538: a(n) = b(n-1) + b(n-3), a(0) = 2, a(1) = 3, a(2) = 4

%C A022438-A299540: a(n) = b(n-1) + b(n-3), a(0) = 2, a(1) = 3, a(2) = 5

%C A299541-A299542: a(n) = b(n-1) + b(n-3), a(0) = 2, a(1) = 4, a(2) = 6

%C A299543-A299544: a(n) = 2*b(n-1) + b(n-2) - b(n-3), a(0) = 1, a(1) = 2, a(2) = 3

%C A299545-A299546: a(n) = b(n-1) + 2*b(n-2) - b(n-3), a(0) = 1, a(1) = 2, a(2) = 3

%C A299547: a(n) = b(n-1) + b(n-2) + ... + b(0), a(0) = 1, a(1) = 2, a(2) = 3

%H Ivan Neretin, <a href="/A022424/b022424.txt">Table of n, a(n) for n = 0..10000</a>

%H J-P. Bode, H. Harborth, C. Kimberling, <a href="https://www.fq.math.ca/Papers1/45-3/bode.pdf">Complementary Fibonacci sequences</a>, Fibonacci Quarterly 45 (2007), 254-264.

%t Fold[Append[#1, Plus @@ Complement[Range[Max@#1 + 3], #1][[{#2, #2 + 1}]]] &, {1, 2}, Range[56]] (* _Ivan Neretin_, Mar 28 2017 *)

%Y Cf. A055563 (complement), A022425, A299407, A299486-A299494.

%Y Another pair is given in A324142, A324143.

%K nonn

%O 0,2

%A _Clark Kimberling_

%E Edited by _Clark Kimberling_, Feb 16 2018