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 A288233 #12 Mar 12 2025 04:40:33
%S A288233 1,3,5,9,17,30,52,91,160,281,494,871,1537,2711,4782,8437,14885,26258,
%T A288233 46319,81706,144126,254229,448442,791021,1395308,2461230,4341448,
%U A288233 7658035,13508286,23827758,42030652,74139404,130777206,230682689,406909610,717762700
%N A288233 Coefficients in the expansion of 1/([r]-[2*r]*x+[3*r]*x^2-...); [ ]=floor, r=sqrt(8/3).
%C A288233 Conjecture: the sequence is strictly increasing.
%e A288233 G.f.: 1/(Sum_{k>=0} [(k+1)*r]*(-x)^k), where r = sqrt(8/3) and [ ] = floor.
%t A288233 r = Sqrt[8/3];
%t A288233 u = 1000; (* # initial terms from given series *)
%t A288233 v = 100; (* # coefficients in reciprocal series *)
%t A288233 CoefficientList[Series[1/Sum[Floor[r*(k + 1)] (-x)^k, {k, 0, u}], {x, 0, v}], x]
%Y A288233 Cf. A078140 (includes guide to related sequences).
%K A288233 nonn,easy
%O A288233 0,2
%A A288233 _Clark Kimberling_, Jul 11 2017