|
%I #18 Mar 26 2020 15:54:49
%S 1,0,1,0,-1,1,0,1,-3,1,0,-1,7,-6,1,0,2,-15,25,-10,1,0,-8,37,-90,65,
%T -15,1,0,27,-133,322,-350,140,-21,1,0,-70,587,-1330,1757,-1050,266,
%U -28,1,0,265,-2526,6607,-9114,7077,-2646,462,-36,1
%N Triangle read by rows, inverse Bell transform of second order Bell numbers (A187761).
%H Peter Luschny, <a href="https://oeis.org/wiki/User:Peter_Luschny/BellTransform">The Bell transform</a>
%e [ 1 ]
%e [ 0, 1 ]
%e [ 0, -1, 1 ]
%e [ 0, 1, -3, 1 ]
%e [ 0, -1, 7, -6, 1 ]
%e [ 0, 2, -15, 25, -10, 1 ]
%e [ 0, -8, 37, -90, 65, -15, 1 ]
%e [ 0, 27, -133, 322, -350, 140, -21, 1 ]
%e [ 0, -70, 587, -1330, 1757, -1050, 266, -28, 1 ]
%e [ 0, 265, -2526, 6607, -9114, 7077, -2646, 462, -36, 1 ]
%o (Sage) # uses[bell_transform from A264428, inverse_bell_transform from A264429]
%o def A264431_matrix(dim):
%o uno = [1]*dim
%o bell_numbers = [sum(bell_transform(n, uno)) for n in range(dim)]
%o bell_number_2 = [sum(bell_transform(n, bell_numbers)) for n in range(dim)]
%o return inverse_bell_transform(dim, bell_number_2)
%o A264431_matrix(10)
%Y Cf. A000110, A187761, A264428, A264429.
%K sign,tabl
%O 0,9
%A _Peter Luschny_, Nov 13 2015
|
