OFFSET
0,3
FORMULA
a(n) = floor(sqrt(A078678(n))).
MATHEMATICA
FSFromSeries[f_, x_, n_] := Map[Floor[Sqrt[#]]&, CoefficientList[Series[f, {x, 0, n}], x]]
FSFromSeries[(1+x+x^2)/Sqrt[1-2x-x^2-2x^3+x^4], x, 100]
CROSSREFS
KEYWORD
nonn
AUTHOR
Emanuele Munarini, Jul 07 2011
STATUS
approved