%I #17 Jul 10 2015 19:29:07
%S 1,1,4,15,72,403,2546,17867,137528,1149079,10335766,99425087,
%T 1017259964,11018905667,125860969266,1510764243699,18999827156304,
%U 249687992188015,3420706820299374,48751337014396167
%N D-analogs of Bell numbers.
%H R. Suter, <a href="http://www.cs.uwaterloo.ca/journals/JIS/VOL3/SUTER/sut1.html">Two analogues of a classical sequence</a>, J. Integer Sequences, Vol. 3 (2000), #P00.1.8.
%F E.g.f.: (exp(x) - x)*exp(1/2*(exp(2*x) - 1)).
%F a(n) = Sum_{k=0..n} A039760(n, k).
%t Range[0, 25]! CoefficientList[Series[(Exp[x] - x) Exp[1/2 (Exp[2 x] - 1)], {x, 0, 25}], x] (* _Vincenzo Librandi_, May 03 2015 *)
%o (PARI) x='x+O('x^30); Vec(serlaplace((exp(x) - x)*exp(1/2*(exp(2*x) - 1)))) \\ _Michel Marcus_, May 03 2015
%Y B-analogs of Bell numbers = A007405.
%K nonn
%O 0,3
%A Ruedi Suter (suter(AT)math.ethz.ch)
|