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 A173697 #17 Nov 26 2016 03:16:07 %S A173697 1,0,1,1,1,2,3,4,6,10,16,25,40,63,100,159,253,402,640,1017,1617,2570, %T A173697 4087,6498,10331,16427,26118,41528,66030,104988,166931,265421,422020, %U A173697 671014,1066916,1696402,2697289,4288703,6819061,10842344,17239385,27410714,43583183,69297495,110183389,175192180,278556508 %N A173697 a(n) = ceiling(A013984(n)/2). %H A173697 G. C. Greubel, <a href="/A173697/b173697.txt">Table of n, a(n) for n = 0..1000</a> %F A173697 a(n) = ceiling(A013984(n)/2). %t A173697 Ceiling[CoefficientList[Series[1/(1 - x^2 - x^3 - x^4 - x^5 - x^6 - x^7), {x, 0, 50}], x]/2] (* _G. C. Greubel_, Nov 23 2016 *) %Y A173697 Cf. A013984. %K A173697 nonn,easy,less %O A173697 0,6 %A A173697 _Roger L. Bagula_, Nov 25 2010 %E A173697 Erroneous leading zeros deleted by _G. C. Greubel_, Nov 23 2016