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 A136665 #3 Mar 30 2012 17:34:23 %S A136665 1,0,1,-2,0,2,0,-7,0,4,8,0,-22,0,8,0,51,0,-64,0,16,-48,0,234,0,-176,0, %T A136665 32,0,-453,0,916,0,-464,0,64,384,0,-2778,0,3240,0,-1184,0,128,0,4845, %U A136665 0,-13800,0,10656,0,-2944,0,256,-3840,0,37470,0,-60000,0,33152,0,-7168,0,512 %N A136665 Triangle of coefficients of Hermite-like analog of A053120 Chebyshev's T(n, x) polynomials (powers of x in increasing order): p(x,n)=2*x*p(x,n-1)-n*p(x,n-2). %C A136665 Row sums: %C A136665 {1, 1, 0, -3, -6, 3, 42, 63, -210, -987, 126} %F A136665 p(x,n)=2*x*p(x,n-1)-n*p(x,n-2). %e A136665 {1}, %e A136665 {0, 1}, %e A136665 {-2, 0, 2}, %e A136665 {0, -7, 0, 4}, %e A136665 {8, 0, -22, 0, 8}, %e A136665 {0, 51, 0, -64, 0, 16}, %e A136665 {-48, 0, 234, 0, -176, 0, 32}, %e A136665 {0, -453, 0, 916, 0, -464,0, 64}, %e A136665 {384, 0, -2778, 0, 3240, 0, -1184, 0, 128}, %e A136665 {0, 4845, 0, -13800, 0, 10656, 0, -2944, 0,256}, %e A136665 {-3840, 0, 37470, 0, -60000, 0, 33152, 0, -7168, 0, 512} %t A136665 P[x, 0] = 1; P[x, 1] = x; P[x_, n_] := P[x, n] = 2*x*P[x, n - 1] - n*P[x, n - 2]; Table[ExpandAll[P[x, n]], {n, 0, 10}]; a = Table[CoefficientList[P[x, n], x], {n, 0, 10}]; Flatten[a] %Y A136665 Cf. A053120. %K A136665 uned,tabl,sign %O A136665 1,4 %A A136665 _Roger L. Bagula_, Apr 02 2008