A174578 Expansion of g.f.: -1/(-1 + x + x^4 - x^10 + x^13 + x^14).

1, 1, 1, 1, 2, 3, 4, 5, 7, 10, 13, 17, 23, 33, 46, 62, 83, 114, 158, 217, 296, 405, 557, 764, 1044, 1427, 1957, 2686, 3680, 5035, 6893, 9446, 12944, 17728, 24278, 33259, 45567, 62417, 85486, 117094, 160411, 219748, 301005, 412299, 564771, 773650, 1059760

Offset

0,5

Comments

Limiting ratio is: 1.3698098178136... .

The polynomial was developed from x^4-x^3-1.

References

McKean and Moll, Elliptic Curves, Function Theory,Geometry, Arithmetic, Cambridge University Press, New York, 199, page 173

Links

Table of n, a(n) for n=0..46.

Index entries for linear recurrences with constant coefficients, signature (1, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 1, 1).

Mathematica

f[x_] = x^4 - x^3 - 1;
p[x_] = ExpandAll[x^4*f[-1/x] - x^(4 + 6)*f[x]];
f[x_] = ExpandAll[x^14*p[1/x]]
a = Table[SeriesCoefficient[
      Series[-1/f[x], {x, 0, 100}], n], {n, 0, 100}]

Crossrefs

Cf. A174577.

Sequence in context: A052335 A193771 A160333 * A241733 A241338 A271489

Adjacent sequences: A174575 A174576 A174577 * A174579 A174580 A174581

Keyword

nonn,easy

Author

Roger L. Bagula, Nov 29 2010

Status

approved