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 A022954 #9 Apr 05 2016 10:26:02
%S A022954 1,8,13,19,26,35,45,56,68,82,97,113,130,148,168,189,211,234,258,283,
%T A022954 310,338,367,397,428,460,493,527,563,600,638,677,717,758,800,843,887,
%U A022954 933,980,1028,1077,1127,1178,1230,1283,1337,1392,1449,1507,1566
%N A022954 a(n) = a(n-1) + c(n+1) for n >= 3, a( ) increasing, given a(1)=1, a(2)=8; where c( ) is complement of a( ).
%C A022954 Here "complement" refers to the numbers not in the sequence.
%H A022954 Ivan Neretin, <a href="/A022954/b022954.txt">Table of n, a(n) for n = 1..10000</a>
%t A022954 Fold[Append[#1, #1[[-1]] + Complement[Range[Max@#1 + 3], #1][[#2 + 1]]] &, {1, 8}, Range[3, 50]] (* _Ivan Neretin_, Apr 05 2016 *)
%Y A022954 Cf. A005228 and references therein.
%K A022954 nonn
%O A022954 1,2
%A A022954 _Clark Kimberling_