The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A154228 A recursive triangular sequence: A(n,k)= A(n - 1, k - 1) + A(n - 1, k) +(n*(n + 1)*(2*n + 1)/6)*A(n - 2, k - 1). 0
 1, 1, 1, 1, 16, 1, 1, 47, 47, 1, 1, 103, 974, 103, 1, 1, 195, 5354, 5354, 195, 1, 1, 336, 19969, 147068, 19969, 336, 1, 1, 541, 60085, 1259253, 1259253, 60085, 541, 1, 1, 827, 156386, 7010503, 44432886, 7010503, 156386, 827, 1, 1, 1213, 365498, 30299614 (list; table; graph; refs; listen; history; text; internal format)
 OFFSET 0,5 COMMENTS Row sums are: {1, 2, 18, 96, 1182, 11100, 187680, 2639760, 58768320, 1133844240,...}. LINKS FORMULA A(n,k)= A(n - 1, k - 1) + A(n - 1, k) + (n*(n + 1)*(2*n + 1)/6)*A(n - 2, k - 1). EXAMPLE {1}, {1, 1}, {1, 16, 1}, {1, 47, 47, 1}, {1, 103, 974, 103, 1}, {1, 195, 5354, 5354, 195, 1}, {1, 336, 19969, 147068, 19969, 336, 1}, {1, 541, 60085, 1259253, 1259253, 60085, 541, 1}, {1, 827, 156386, 7010503, 44432886, 7010503, 156386, 827, 1}, {1, 1213, 365498, 30299614, 536255794, 536255794, 30299614, 365498, 1213, 1} MATHEMATICA A[n_, 1] := 1; A[n_, n_] := 1; A[n_, k_] := A[n - 1, k - 1] + A[n - 1, k] + (n*(n + 1)*(2*n + 1)/6)*A[n - 2, k - 1]; Table[Table[A[n, m], {m, 1, n}], {n, 1, 10}]; Flatten[%] CROSSREFS Sequence in context: A040256 A245910 A133824 * A141697 A202750 A177823 Adjacent sequences:  A154225 A154226 A154227 * A154229 A154230 A154231 KEYWORD nonn,tabl,uned AUTHOR Roger L. Bagula, Jan 05 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 | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 19 15:09 EDT 2020. Contains 337178 sequences. (Running on oeis4.)