login
Floor-Sqrt transform of Sylvester continuants (A002801).
0

%I #4 Mar 30 2012 18:55:30

%S 1,1,1,2,7,20,65,232,883,3581,15383,69579,329769,1631137,8391824,

%T 44777342,247182082,1408611456,8270902948,49953724226,309870713560,

%U 1971523962002,12849924998486,85702472618249,584305721381119,4068533850711783,28907888594859403

%N Floor-Sqrt transform of Sylvester continuants (A002801).

%F a(n) = floor(sqrt(A002801(n))).

%t FSFromExpSeries[f_,x_,n_] := Map[Floor[Sqrt[#]]&,CoefficientList[Series[f,{x,0,n}],x]Table[k!,{k,0,n}]]

%t FSFromExpSeries[Exp[x/2]/(1-2x)^(1/4),x,40]

%K nonn

%O 0,4

%A _Emanuele Munarini_, Jul 07 2011