login
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
OFFSET
0,4
FORMULA
a(n) = floor(sqrt(A078679(n))).
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
Sequence in context: A158510 A004695 A014216 * A079961 A303430 A144023
KEYWORD
nonn
AUTHOR
Emanuele Munarini, Jul 07 2011
STATUS
approved