This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A155834 A triangle sequence of general recursive Sierpinski-Pascal minus general Narayana with adjusted n,m levels and zeros out:k=2; t(n,m)=Pascal(n,m,k-1)-Narayana(n-1,m-1,2*(k-1)). 0
 1, 1, 6, 16, 6, 22, 127, 127, 22, 64, 701, 1436, 701, 64, 163, 3117, 11503, 11503, 3117, 163, 382, 12088, 74122, 131494, 74122, 12088, 382, 848, 42890, 413612, 1193930, 1193930, 413612, 42890, 848, 1816, 143562, 2094588, 9280734, 14992440, 9280734 (list; table; graph; refs; listen; history; text; internal format)
 OFFSET 4,3 COMMENTS Row sums are; 2, 28, 298, 2966, 29566, 304678, 3302560, 38033840, 467861040, 6159690808, 86763791762,... This level is the Eulerian number level: only the odd Narayana levels correspond to the recursive Sierpinski-Pascal levels. LINKS FORMULA Pascal(n,m,k): a(n,k,m)=(m*n - m*k + 1)*a(n - 1, k - 1, m) + (m*k - (m - 1))*a(n - 1, k, m); Narayana(n,m,k): y(n,m,k)=Product[Binomial[n + k, m + k]/Binomial[n - m + k, k], {k, 0, i}]; k=2; t(n,m)=Pascal(n,m,k-1)-Narayana(n-1,m-1,2*(k-1)). EXAMPLE {1, 1}, {6, 16, 6}, {22, 127, 127, 22}, {64, 701, 1436, 701, 64}, {163, 3117, 11503, 11503, 3117, 163}, {382, 12088, 74122, 131494, 74122, 12088, 382}, {848, 42890, 413612, 1193930, 1193930, 413612, 42890, 848}, {1816, 143562, 2094588, 9280734, 14992440, 9280734, 2094588, 143562, 1816}, {3797, 462541, 9928140, 64761204, 158774838, 158774838, 64761204, 9928140, 462541, 3797}, {7814, 1453700, 44960878, 418557816, 1489425900, 2250878592, 1489425900, 418557816, 44960878, 1453700, 7814}, {15914, 4495909, 197226603, 2558716162, 12781854516, 27839586777, 27839586777, 12781854516, 2558716162, 197226603, 4495909, 15914} MATHEMATICA Clear[A, a0, b0, n, k, m, t, i]; A[n_, 1, m_] := 1; A[n_, n_, m_] := 1; A[n_, k_, m_] := (m*n - m*k + 1)*A[n - 1, k - 1, m] + (m*k - (m - 1))*A[n - 1, k, m]; t[n_, m_, i_] = Product[Binomial[n + k, m + k]/Binomial[n - m + k, k], {k, 0, i}]; m = 2; a = Table[A[n, k, m - 1] - t[n - 1, k - 1, (2*m - 2)], {n, 4, 14}, { k, 2, n - 1}]; Flatten[a] CROSSREFS Sequence in context: A299709 A107777 A136140 * A085452 A028286 A046629 Adjacent sequences:  A155831 A155832 A155833 * A155835 A155836 A155837 KEYWORD nonn,tabl,uned AUTHOR Roger L. Bagula, Jan 28 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 15 16:12 EDT 2019. Contains 327078 sequences. (Running on oeis4.)