Nothing Special   »   [go: up one dir, main page]

login
Revision History for A049353 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
A triangle of numbers related to triangle A030526.
(history; published version)
#47 by Wolfdieter Lang at Wed Aug 28 16:41:51 EDT 2019
STATUS

editing

approved

#46 by Wolfdieter Lang at Wed Aug 28 16:41:46 EDT 2019
LINKS

W. Lang, <a href="/LANGCHANGE/A049353/a049353.texttxt">First ten rows. </a>

STATUS

approved

editing

#45 by N. J. A. Sloane at Wed Aug 28 09:25:22 EDT 2019
LINKS

W. Lang, <a href="http://www.itp.kit.edu/~wl/EISpubLANGCHANGE/A049353.text">First ten rows. </a>

Discussion
Wed Aug 28
09:25
OEIS Server: https://oeis.org/edit/global/2824
#44 by Susanna Cuyler at Wed Jul 04 08:56:06 EDT 2018
STATUS

proposed

approved

#43 by Michel Marcus at Wed Jul 04 06:30:16 EDT 2018
STATUS

editing

proposed

#42 by Michel Marcus at Wed Jul 04 06:30:14 EDT 2018
FORMULA

a(n,k) = (n!*sum(j=1..k, (-1)^(k-j)*binomial(k,j)*binomial(n+4*j-1,4*j-1)))/(4^k*k!). - Vladimir Kruchinin, Apr 01 2011

STATUS

proposed

editing

#41 by Jon E. Schoenfield at Wed Jul 04 05:52:11 EDT 2018
STATUS

editing

proposed

#40 by Jon E. Schoenfield at Wed Jul 04 05:52:09 EDT 2018
PROG

(Maxima) a(n, k):=(n!*sum((-1)^(k-j)*binomial(k, j)*binomial(n+4*j-1, 4*j-1), j, 1, k))/(4^k*k!); [From _/* _Vladimir Kruchinin_, Apr 01 2011] */

STATUS

approved

editing

#39 by Michel Marcus at Sat Jun 23 06:08:40 EDT 2018
STATUS

editing

approved

#38 by Michel Marcus at Sat Jun 23 06:08:36 EDT 2018
MATHEMATICA

a[n_, m_] /; n >= m >= 1 := a[n, m] = (4m + n - 1)*a[n-1, m] + a[n-1, m-1]; a[n_, m_] /; n < m = 0; a[_, 0] = 0; a[1, 1] = 1; Flatten[Table[a[n, m], {n, 1, 9}, {m, 1, n}]] (* From __Jean-François Alcover_, Jul 22 2011 *)

STATUS

reviewed

editing