login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A352363
Triangle read by rows. The incomplete Bell transform of the swinging factorials A056040.
4
1, 0, 1, 0, 1, 1, 0, 2, 3, 1, 0, 6, 11, 6, 1, 0, 6, 50, 35, 10, 1, 0, 30, 166, 225, 85, 15, 1, 0, 20, 756, 1246, 735, 175, 21, 1, 0, 140, 2932, 7588, 5761, 1960, 322, 28, 1, 0, 70, 11556, 45296, 46116, 20181, 4536, 546, 36, 1
OFFSET
0,8
FORMULA
Given a sequence s let s|n denote the initial segment s(0), s(1), ..., s(n).
(T(s))(n, k) = IncompleteBellPolynomial(n, k, s|n), where s(n) = n!/floor(n/2)!^2.
EXAMPLE
Triangle starts:
[0] 1;
[1] 0, 1;
[2] 0, 1, 1;
[3] 0, 2, 3, 1;
[4] 0, 6, 11, 6, 1;
[5] 0, 6, 50, 35, 10, 1;
[6] 0, 30, 166, 225, 85, 15, 1;
[7] 0, 20, 756, 1246, 735, 175, 21, 1;
[8] 0, 140, 2932, 7588, 5761, 1960, 322, 28, 1;
[9] 0, 70, 11556, 45296, 46116, 20181, 4536, 546, 36, 1;
MAPLE
SwingNumber := n -> n! / iquo(n, 2)!^2:
for n from 0 to 9 do
seq(IncompleteBellB(n, k, seq(SwingNumber(j), j = 0..n)), k = 0..n) od;
CROSSREFS
Cf. A056040, A352364 (row sums), A352365 (alternating row sums).
Sequence in context: A264428 A256550 A005210 * A264430 A264433 A132393
KEYWORD
nonn,tabl
AUTHOR
Peter Luschny, Mar 15 2022
STATUS
approved