|
%I #8 Aug 20 2016 23:49:48
%S 1,1,4,15,61,272,1317,6865,38278,227093,1426921,9457918,65898275,
%T 481177881,3672102116,29218285875,241873478425,2079079678176,
%U 18524191138689,170803860905237,1627465240969382
%N Row sums and second diagonal of A046934.
%C The offset corresponds to the definition of A046934.
%C Differences of A032346 and of A032347.
%t Clear[d]; d[0] = 1; d[1] = 0; d[n_] := d[n] =
%t 1 + Sum[Binomial[n - 1, j]*d[j], {j, 2, n - 1}]; Table[
%t d[n + 2] - d[n + 1], {n, 0, 22}] (* From the code by J.-F. Alcover and Jon Perry in A032347 *)
%Y Cf. A046934, A046935, A032346, A032347.
%Y Cf. A005493 (first differences of Bell numbers, second diagonal and row sum of A011971).
%K nonn,easy
%O 0,3
%A _Olivier Gérard_, Aug 11 2016
|
