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 A014243 #15 Jun 20 2019 09:09:54
%S A014243 -2,-2,-1,2,8,17,34,62,108,183,305,502,823,1343,2185,3548,5754,9324,
%T A014243 15101,24449,39575,64049,103651,167729,271410,439170,710612,1149815,
%U A014243 1860461,3010311,4870808,7881156
%N A014243 a(n) = ((n+1)-st Lucas number) - (n-th non-Lucas number).
%H A014243 G. C. Greubel, <a href="/A014243/b014243.txt">Table of n, a(n) for n = 1..1000</a>
%F A014243 a(n) = A000032(n+1) - A057854(n) for n >= 1. - _Michel Marcus_, May 28 2019
%e A014243 For example, a(5) = A000032(6) - A057854(5) = 18-10 = 8.
%t A014243 b:= Complement[Range[1, 100], LucasL[Range[20]]]; Table[LucasL[n+1] - b[[n+1]], {n,1,40}] (* _G. C. Greubel_, Jun 19 2019 *)
%Y A014243 Cf. A000032, A057854.
%K A014243 sign
%O A014243 1,1
%A A014243 _Clark Kimberling_
%E A014243 Edited by _N. J. A. Sloane_, May 28 2019