This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A265022 #18 Mar 27 2020 12:11:39 %S A265022 1,1,0,-2,-1,12,20,-113,-430,1278,10821,-10234,-317048,-384915, %T A265022 10352420,42836466,-340348905,-3180089128,8045616512,219303897655, %U A265022 301713947470,-14401913182942,-84197219028827,824481606288554,11426928115546036,-23133559937561187 %N A265022 Row sums of the Bell transform of the complementary Bell numbers (A264435). %H A265022 Peter Luschny, <a href="https://oeis.org/wiki/User:Peter_Luschny/BellTransform">The Bell transform</a> %t A265022 Table[Sum[BellY[n, k, BellB[Range[n] - 1, -1]], {k, 0, n}], {n, 0, 30}] (* _Vladimir Reshetnikov_, Nov 09 2016 *) %o A265022 (Sage) # uses[bell_transform from A264428] %o A265022 def A265022_list(len): %o A265022 uno = [1]*len %o A265022 complementary_bell_numbers = [sum((-1)^n*b for (n, b) in enumerate (bell_transform(n, uno))) for n in range(len)] %o A265022 return [sum(bell_transform(n, complementary_bell_numbers)) for n in range(len)] %o A265022 A265022_list(26) %Y A265022 Cf. A000587 (complementary Bell numbers), A264428, A264435, A265023, A265024. %K A265022 sign %O A265022 0,4 %A A265022 _Peter Luschny_, Dec 01 2015