cp's OEIS Frontend

A055896 Exponential transform of Stirling2 triangle A008277.

%I A055896 #14 Jan 25 2020 18:05:47
%S A055896 1,1,2,1,6,5,1,14,30,15,1,30,125,150,52,1,62,450,975,780,203,1,126,
%T A055896 1505,5250,7280,4263,877,1,254,4830,25515,54600,53998,24556,4140,1,
%U A055896 510,15125,116550,361452,537138,405174,149040,21147,1,1022,46650
%N A055896 Exponential transform of Stirling2 triangle A008277.
%H A055896 N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>
%F A055896 E.g.f.: A(x, y) = exp(exp(y*exp(x)-y)-1).
%e A055896 Triangle begins
%e A055896   1;
%e A055896   1,   2;
%e A055896   1,   6,   5;
%e A055896   1,  14,  30,  15;
%e A055896   1,  30, 125, 150,  52; ...
%t A055896 nn=8; a=Exp[x]-1; Drop[Map[Select[#, #>0&]&, Range[0,nn]! CoefficientList[Series[Exp[Exp[y a]-1], {x,0,nn}], {x,y}]], 1]//Grid (* _Geoffrey Critzer_, Sep 22 2013 *)
%Y A055896 Row sums give A000258.
%K A055896 nonn,tabl
%O A055896 1,3
%A A055896 _Christian G. Bower_, Jun 09 2000