The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A292860

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A292860

Square array A(n,k), n>=0, k>=0, read by antidiagonals downwards, where column k is the expansion of e.g.f. exp(k*(exp(x) - 1)).
(history; published version)

#53 by Alois P. Heinz at Thu Dec 23 06:05:32 EST 2021

STATUS

proposed

approved

#52 by Peter Luschny at Thu Dec 23 05:44:22 EST 2021

STATUS

editing

proposed

#51 by Peter Luschny at Thu Dec 23 05:41:37 EST 2021

CROSSREFS

Another version Same array, different indexing is A189233.

#50 by Peter Luschny at Thu Dec 23 05:28:47 EST 2021

FORMULA

A(n,k) = BellPolynomial(n, k). - Peter Luschny, Dec 23 2021

MATHEMATICA

A292860[n_, k_] := BellB[n, k]; Table[A292860[k, n - k], {n, 0, 10}, {k, 0, n}] // Flatten (* Peter Luschny, Dec 23 2021 *)

STATUS

approved

editing

#49 by Alois P. Heinz at Sat Feb 13 04:57:50 EST 2021

STATUS

proposed

approved

#48 by Jean-François Alcover at Sat Feb 13 02:38:04 EST 2021

STATUS

editing

proposed

#47 by Jean-François Alcover at Sat Feb 13 02:37:55 EST 2021

MATHEMATICA

A[0, _] = 1; A[n_ /; n >= 0, k_ /; k >= 0] := A[n, k] = k*Sum[Binomial[n-1, j]*A[j, k], {j, 0, n-1}]; A[_, _] = 0;

Table[A[n, d - n], {d, 0, 12}, {n, 0, d}] // Flatten (* Jean-François Alcover, Feb 13 2021 *)

STATUS

approved

editing

#46 by Alois P. Heinz at Sun Jul 28 07:12:12 EDT 2019

STATUS

reviewed

approved

#45 by Joerg Arndt at Sun Jul 28 06:24:36 EDT 2019

STATUS

proposed

reviewed

#44 by Seiichi Manyama at Sun Jul 28 05:05:12 EDT 2019

STATUS

editing

proposed