|
|
A192672
|
|
Floor-Sqrt transform of little Schroeder numbers (A001003).
|
|
0
|
|
|
1, 1, 1, 3, 6, 14, 30, 65, 144, 321, 720, 1626, 3694, 8428, 19305, 44371, 102291, 236450, 547868, 1272148, 2959613, 6897450, 16100184, 37635909, 88095027, 206458158, 484399704, 1137707979, 2674734202, 6293966627, 14823002101, 34937537185, 82408390392, 194515481823
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
FORMULA
|
a(n) = floor(sqrt(littleSchroder(n))).
|
|
MATHEMATICA
|
FSFromSeries[f_, x_, n_] := Map[Floor[Sqrt[#]]&, CoefficientList[Series[f, {x, 0, n}], x]]
FSFromSeries[(1+x-Sqrt[1-6x+x^2])/(4x), x, 100]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|