This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A279628 Coefficients in the expansion of ([s] + [2s]x + [3s]x^2 + ...)/([r] + [2r]x + [3r]x^2 + ...); [ ] = floor, r = sqrt(2), s = sqrt(3). 2
 1, 1, -1, -1, 2, 0, -1, 0, -1, 2, 2, -6, 3, 3, -8, 11, -4, -16, 30, -15, -24, 58, -55, -7, 108, -158, 58, 173, -357, 268, 170, -713, 831, -98, -1235, 2070, -1154, -1641, 4463, -4207, -894, 8392, -11527, 3917, 13077, -26782, 19818, 13765, -54309, 61370, -4901 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,5 LINKS Clark Kimberling, Table of n, a(n) for n = 0..1000 FORMULA G.f.:  ([s] + [2s]x + [3s]x^2 + ...)/([r] + [2r]x + [3r]x^2 + ...); [ ] = floor, r = sqrt(2), s = sqrt(3). MATHEMATICA z = 100; r = Sqrt[2]; f[x_] := f[x] = Sum[Floor[r*(k + 1)] x^k, {k, 0, z}]; s = Sqrt[3]; g[x_] := g[x] = Sum[Floor[s*(k + 1)] x^k, {k, 0, z}]; CoefficientList[Series[g[x]/f[x], {x, 0, z}], x] CROSSREFS Cf. A001951, A022838, A279629. Sequence in context: A035698 A230204 A161502 * A241914 A324393 A071482 Adjacent sequences:  A279625 A279626 A279627 * A279629 A279630 A279631 KEYWORD sign,easy AUTHOR Clark Kimberling, Dec 17 2016 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 20 16:17 EDT 2019. Contains 322310 sequences. (Running on oeis4.)