|
%I #4 Dec 07 2017 22:20:26
%S 1,-1,2,-4,7,-11,16,-22,28,-30,18,29,-152,427,-988,2060,-4002,7354,
%T -12868,21472,-34054,50838,-69920,84186,-75275,2395,217417,-742554,
%U 1860191,-4067099,8183154,-15493168,27886577,-47905049,78485095,-121944988,177329498,-234464309,261801461,-183121605,-164852147
%N Expansion of 1/(1 + x/(1 + x/(1 + x^2/(1 + x/(1 + x^3/(1 + x/(1 + x^4/(1 + ...)))))))), a continued fraction.
%t nmax = 40; CoefficientList[Series[1/(1 + ContinuedFractionK[x^(1 + k (1 + (-1)^k)/4), 1, {k, 0, nmax}]), {x, 0, nmax}], x]
%Y Cf. A007325, A092869, A129509, A292799, A292854, A296201.
%K sign
%O 0,3
%A _Ilya Gutkovskiy_, Dec 07 2017
|
