A192680 Floor-Sqrt transform of Sylvester continuants (A002801).

1, 1, 1, 2, 7, 20, 65, 232, 883, 3581, 15383, 69579, 329769, 1631137, 8391824, 44777342, 247182082, 1408611456, 8270902948, 49953724226, 309870713560, 1971523962002, 12849924998486, 85702472618249, 584305721381119, 4068533850711783, 28907888594859403

Offset: 0

Author

Emanuele Munarini, Jul 07 2011

Keywords

• nonn

Programs

Mathematica

FSFromExpSeries[f_,x_,n_] := Map[Floor[Sqrt[#]]&,CoefficientList[Series[f,{x,0,n}],x]Table[k!,{k,0,n}]]
FSFromExpSeries[Exp[x/2]/(1-2x)^(1/4),x,40]

Formula

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