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

%I #16 Oct 02 2023 14:33:49

%S 1,1,1,1,2,3,4,5,7,10,13,17,23,33,46,62,83,114,158,217,296,405,557,

%T 764,1044,1427,1957,2686,3680,5035,6893,9446,12944,17728,24278,33259,

%U 45567,62417,85486,117094,160411,219748,301005,412299,564771,773650,1059760

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

%C Limiting ratio is: 1.3698098178136... .

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

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

%H <a href="/index/Rec#order_14">Index entries for linear recurrences with constant coefficients</a>, signature (1, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 1, 1).

%t f[x_] = x^4 - x^3 - 1;

%t p[x_] = ExpandAll[x^4*f[-1/x] - x^(4 + 6)*f[x]];

%t f[x_] = ExpandAll[x^14*p[1/x]]

%t a = Table[SeriesCoefficient[

%t Series[-1/f[x], {x, 0, 100}], n], {n, 0, 100}]

%Y Cf. A174577.

%K nonn,easy

%O 0,5

%A _Roger L. Bagula_, Nov 29 2010