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 A122588 #25 Sep 08 2022 08:45:28
%S A122588 1,9,53,260,1156,4845,19551,76912,297275,1134705,4292145,16128061,
%T A122588 60304951,224660626,834641671,3094322026,11453607152,42344301686,
%U A122588 156404021389,577291806894,2129654436910,7853149169635,28949515515376,106692395098433,393137817645838
%N A122588 Expansion of x/(1 - 9*x + 28*x^2 - 35*x^3 + 15*x^4 - x^5).
%C A122588 Essentially the same as A005025. - _R. J. Mathar_, Aug 02 2008
%H A122588 Colin Barker, <a href="/A122588/b122588.txt">Table of n, a(n) for n = 1..1000</a>
%H A122588 MathPuzzle, <a href="http://www.mathpuzzle.com/ChebyshevU.html">Chebyshev Polynomials</a>.
%H A122588 <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (9,-28,35,-15,1).
%F A122588 G.f.: x/(1 - 9*x + 28*x^2 - 35*x^3 + 15*x^4 - x^5).
%t A122588 m = 10; p[x_]:= ExpandAll[x^m*ChebyshevU[m, 1/x]]; Table[SeriesCoefficient[ Series[2^(n+m-1)*x/p[x], {x,0,30}], n], {n,1,30,2}]
%o A122588 (Magma) I:=[1,9,53,260,1156]; [n le 5 select I[n] else 9*Self(n-1) -28*Self(n-2) +35*Self(n-3) -15*Self(n-4) +Self(n-5): n in [1..30]]; // _G. C. Greubel_, Nov 29 2021
%o A122588 (Sage)
%o A122588 def A122588_list(prec):
%o A122588 P.<x> = PowerSeriesRing(ZZ, prec)
%o A122588 return P( x/(1-9*x+28*x^2-35*x^3+15*x^4-x^5) ).list()
%o A122588 a=A122588_list(31); a[1:] # _G. C. Greubel_, Nov 29 2021
%Y A122588 Cf. A005021, A005025, A094256, A122589.
%K A122588 nonn,easy,less
%O A122588 1,2
%A A122588 _Roger L. Bagula_ and _Gary W. Adamson_, Sep 19 2006
%E A122588 Generating function corrected by _R. J. Mathar_, Jul 09 2009
%E A122588 New name (using g.f.) and editing by _Joerg Arndt_, Feb 12 2015