OFFSET
0,2
LINKS
Clark Kimberling, Table of n, a(n) for n = 0..1000
EXAMPLE
G.f.: 1/([r] + [2r]x + [3r]x^2 + ...); [ ] = floor, r = -1 + sqrt(5).
MATHEMATICA
z = 30; r = -1 + Sqrt[5];
f[x_] := f[x] = Sum[Floor[r*(k + 1)] x^k, {k, 0, z}]; f[x]
CoefficientList[Series[1/f[x], {x, 0, 2*z}], x]
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Clark Kimberling, Dec 16 2016
STATUS
approved