This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A022427 #10 Jan 05 2025 19:51:34 %S A022427 1,2,3,10,12,14,16,19,22,26,30,33,37,39,43,45,48,51,53,56,59,61,65,67, %T A022427 70,73,76,79,82,85,88,91,95,97,101,104,107,111,113,117,120,123,126, %U A022427 129,132,135,139,141,145,147,151,153,157,159,163,165,169,171 %N A022427 a(n) = c(n-1) + c(n-3) where c is the sequence of numbers not in a. %H A022427 Ivan Neretin, <a href="/A022427/b022427.txt">Table of n, a(n) for n = 0..10000</a> %H A022427 J-P. Bode, H. Harborth, C. Kimberling, <a href="https://web.archive.org/web/2024*/https://www.fq.math.ca/Papers1/45-3/bode.pdf">Complementary Fibonacci sequences</a>, Fibonacci Quarterly 45 (2007), 254-264. %t A022427 Fold[Append[#1, Plus @@ Complement[Range[Max@#1 + 3], #1][[{#2, #2 + 2}]]] &, {1, 2, 3}, Range[55]] (* _Ivan Neretin_, Mar 28 2017 *) %Y A022427 Cf. A022424 and references therein. %Y A022427 Cf. A299536. %K A022427 nonn %O A022427 0,2 %A A022427 _Clark Kimberling_