|
|
A088353
|
|
G.f. = continued fraction: A(x)=1/(1-x-x^2-x^3/(1-x^4-x^5-x^6/(1-x^7-x^8-x^9/(...)))).
|
|
2
|
|
|
1, 1, 2, 4, 7, 13, 24, 45, 84, 157, 293, 548, 1025, 1917, 3585, 6705, 12542, 23460, 43882, 82081, 153535, 287193, 537205, 1004861, 1879631, 3515926, 6576683, 12301953, 23011306, 43043596, 80514826, 150606312
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ c * d^n, where d = 1.870541465383068095221362846114209693931261586115556... and c = 0.55828451809888511309633311209777966847218631317600288... - Vaclav Kotesovec, Jul 01 2019
|
|
MATHEMATICA
|
nmax = 40; CoefficientList[Series[1/(1 - x - x^2 + ContinuedFractionK[-x^(3*k), 1 - x^(3*k + 1) - x^(3*k + 2), {k, 1, nmax}]), {x, 0, nmax}], x] (* Vaclav Kotesovec, Jul 01 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|