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 A022957 #9 Apr 05 2016 10:26:19 %S A022957 1,2,3,4,5,7,10,12,15,18,21,26,29,34,38,43,49,53,59,65,71,79,84,91,98, %T A022957 106,115,121,130,138,147,157,165,175,184,194,205,215,226,236,248,260, %U A022957 271,283,294,308,321,333,346,358,374,388,401,415,428,446,461 %N A022957 Unique increasing sequence satisfying a(n) = a(n-5) + c(n-5); where c( ) is complement of a( ). %C A022957 Here "complement" refers to the numbers not in the sequence. %H A022957 Ivan Neretin, <a href="/A022957/b022957.txt">Table of n, a(n) for n = 1..10000</a> %t A022957 Fold[Append[#1, #1[[#2]] + Complement[Range[Max@#1 + 1], #1][[#2]]] &, {1, 2, 3, 4, 5}, Range[52]] (* _Ivan Neretin_, Apr 05 2016 *) %Y A022957 Cf. A005228 and references therein. %K A022957 nonn %O A022957 1,2 %A A022957 _Clark Kimberling_