OFFSET
0,3
COMMENTS
Starts similar to A091964, terms differ after 730.
FORMULA
a(n) ~ c * d^n, where d = 2.5358790673564851880281667369326354455... and c = 0.14917782209027525483339419811881753... - Vaclav Kotesovec, Jun 16 2022
MATHEMATICA
nmax = 40; CoefficientList[Series[1/(1 - x - x^2/(1 - x - x^2 + ContinuedFractionK[-x^k, 1 - x*(1 - x^k)/(1 - x), {k, 3, nmax}])), {x, 0, nmax}], x] (* Vaclav Kotesovec, Jun 16 2022 *)
PROG
(PARI) N=44; q='q+O('q^N);
f(n) = 1 - sum(k=1, n-1, q^k);
s=1; forstep(j=N, 2, -1, s = q^j/s; s = f(j) - s ); s = 1/s;
Vec(s)
CROSSREFS
KEYWORD
nonn
AUTHOR
Joerg Arndt, Jun 16 2022
STATUS
approved