|
|
A192683
|
|
Floor-Sqrt transform of numbers of A078679 (Grand Motzkin paths with no zigzags).
|
|
0
|
|
|
1, 1, 1, 2, 4, 6, 10, 17, 27, 45, 74, 122, 201, 332, 548, 907, 1502, 2490, 4131, 6859, 11396, 18944, 31510, 52437, 87305, 145418, 242310, 403909, 673507, 1123409, 1874396, 3128270, 5222267, 8720050, 14563897, 24329283, 40650780, 67934677, 113551476, 189831651, 317406103, 530797959, 887783981
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
FSFromSeries[f_, x_, n_] := Map[Floor[Sqrt[#]]&, CoefficientList[Series[f, {x, 0, n}], x]]
FSFromSeries[Sqrt[(1-x+x^2)/(1-3x+x^3+x^4)], x, 100]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|