|
%I
%S 1,1,1,3,8,23,68,217,738,2662,10111,40281,167605,725850,3262107,
%T 15175084,72908536,361068922,1839982245,9633358049,51746379547,
%U 284824200163,1604632175859,9243292234736,54390064543757,326645626694244,2000556362576213,12485902607285611
%N Floor-Sqrt transform of ordered Bell numbers (A000670).
%F a(n) = floor(sqrt(orderedBell(n))).
%t FSFromExpSeries[f_,x_,n_] := Map[Floor[Sqrt[#]]&,CoefficientList[Series[f,{x,0,n}],x]Table[k!,{k,0,n}]]
%t FSFromExpSeries[1/(2-Exp[x]),x,40]
%K nonn
%O 0,4
%A _Emanuele Munarini_, Jul 07 2011
|
