|
|
A192680
|
|
Floor-Sqrt transform of Sylvester continuants (A002801).
|
|
0
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
FORMULA
|
|
|
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]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|