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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A279629 Coefficients in the expansion of ([s] + [2s]x + [3s]x^2 + ...)/([r] + [2r]x + [3r]x^2 + ...); [ ] = floor, r = sqrt(3), s = sqrt(2). 2
1, -1, 2, -2, 1, 1, -5, 10, -13, 11, -1, -18, 41, -57, 53, -17, -53, 140, -208, 207, -92, -146, 454, -708, 735, -380, -396, 1427, -2307, 2467, -1390, -1077, 4421, -7346, 8018, -4749, -2997, 13634, -23075, 25501, -15523, -8632, 42051, -71931, 79989, -49260 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

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(3), s = sqrt(2).

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[f[x]/g[x], {x, 0, z}], x]

CROSSREFS

Cf. A001951, A022838, A279628.

Sequence in context: A219727 A177694 A092450 * A309575 A014291 A136587

Adjacent sequences:  A279626 A279627 A279628 * A279630 A279631 A279632

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 October 15 01:40 EDT 2019. Contains 328025 sequences. (Running on oeis4.)