A265022 - OEIS

%I #18 Mar 27 2020 12:11:39

%S 1,1,0,-2,-1,12,20,-113,-430,1278,10821,-10234,-317048,-384915,

%T 10352420,42836466,-340348905,-3180089128,8045616512,219303897655,

%U 301713947470,-14401913182942,-84197219028827,824481606288554,11426928115546036,-23133559937561187

%N Row sums of the Bell transform of the complementary Bell numbers (A264435).

%H Peter Luschny, <a href="https://oeis.org/wiki/User:Peter_Luschny/BellTransform">The Bell transform</a>

%t Table[Sum[BellY[n, k, BellB[Range[n] - 1, -1]], {k, 0, n}], {n, 0, 30}] (* _Vladimir Reshetnikov_, Nov 09 2016 *)

%o (Sage) # uses[bell_transform from A264428]

%o def A265022_list(len):

%o     uno = [1]*len

%o     complementary_bell_numbers = [sum((-1)^n*b for (n, b) in enumerate (bell_transform(n, uno))) for n in range(len)]

%o     return [sum(bell_transform(n, complementary_bell_numbers)) for n in range(len)]

%o A265022_list(26)

%Y Cf. A000587 (complementary Bell numbers), A264428, A264435, A265023, A265024.

%K sign

%O 0,4

%A _Peter Luschny_, Dec 01 2015