login
This site is supported by donations to The OEIS Foundation.

 

Logo


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.

License Agreements, Terms of Use, Privacy Policy. .

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