The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A156817 A triangle sequence from polynomial coefficients: p(x, n) = (4*(n - 1) + (4(n - 1))*x^2)*p(x, n - 1) + 2*(n - 1)x^2*p(x, n - 2). 0
 1, 1, 2, 1, 4, 8, 10, 8, 4, 32, 64, 116, 136, 116, 64, 32, 384, 768, 1800, 2448, 2844, 2448, 1800, 768, 384, 6144, 12288, 35200, 51968, 75232, 79424, 75232, 51968, 35200, 12288, 6144, 122880, 245760, 830720, 1292800, 2226640, 2652320, 3037720 (list; table; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 COMMENTS Row sums are: {1, 4, 34, 560, 13644, 441088, 17779960, 858731136, 48337863056, 3107362933760, 224600212765728,...}. LINKS Table of n, a(n) for n=0..42. FORMULA p(x, n) = (4*(n - 1) + (4(n - 1))*x^2)*p(x, n - 1) + 2*(n - 1)x^2*p(x, n - 2); t(n,m)=coefficients(p(x,n)). EXAMPLE {1}, {1, 2, 1}, {4, 8, 10, 8, 4}, {32, 64, 116, 136, 116, 64, 32}, {384, 768, 1800, 2448, 2844, 2448, 1800, 768, 384}, {6144, 12288, 35200, 51968, 75232, 79424, 75232, 51968, 35200, 12288, 6144}, {122880, 245760, 830720, 1292800, 2226640, 2652320, 3037720, 2652320, 2226640, 1292800, 830720, 245760, 122880}, {2949120, 5898240, 22960128, 37072896, 73799040, 95306496, 127247424, 128264448, 127247424, 95306496, 73799040, 37072896, 22960128, 5898240, 2949120}, {82575360, 165150720, 727179264, 1206632448, 2720886784, 3724722176, 5660473952, 6297118912, 7168383824, 6297118912, 5660473952, 3724722176, 2720886784, 1206632448, 727179264, 165150720, 82575360}, {2642411520, 5284823040, 25959333888, 43991433216, 110705475584, 158396514304, 269384328192, 322223818752, 412559407616, 405067841536, 412559407616, 322223818752, 269384328192, 158396514304, 110705475584, 43991433216, 25959333888, 5284823040, 2642411520}, {95126814720, 190253629440, 1031149191168, 1776917938176, 4933022367744, 7307685494784, 13732208898048, 17369376989184, 24651863020224, 26295847910784, 29833308257184, 26295847910784, 24651863020224, 17369376989184, 13732208898048, 7307685494784, 4933022367744, 1776917938176, 1031149191168, 190253629440, 95126814720} MATHEMATICA Clear[p, x]; p[x, 0] = 1; p[x, 1] = x^2 + 2*x + 1; p[x_, n_] := p[x, n] = (4*(n - 1) + (4(n - 1))*x^2)*p[x, n - 1] + 2*(n - 1)x^2*p[x, n - 2]; Flatten[Table[CoefficientList[ExpandAll[p[x, n]], x], {n, 0, 10}]] CROSSREFS Sequence in context: A112173 A058543 A353661 * A008301 A363386 A294104 Adjacent sequences: A156814 A156815 A156816 * A156818 A156819 A156820 KEYWORD nonn,tabl AUTHOR Roger L. Bagula and Gary W. Adamson, Feb 16 2009 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified March 2 18:02 EST 2024. Contains 370498 sequences. (Running on oeis4.)