|
%I #4 Sep 25 2017 13:08:24
%S 1,0,-1,0,1,1,-1,-2,0,3,1,-3,-3,3,5,-1,-8,-1,9,6,-11,-11,8,21,-5,-27,
%T -8,38,20,-36,-50,38,72,-9,-118,-15,131,100,-170,-166,118,330,-94,
%U -411,-129,618,294,-567,-817,663,1124,-139,-1963,-162,2087,1691,-2902,-2605,1851,5562,-1758
%N Expansion of 1/(1 + x^2/(1 + x^3/(1 + x^5/(1 + x^7/(1 + x^11/(1 + ... + x^prime(k)/(1 + ... ))))))), a continued fraction.
%t nmax = 60; CoefficientList[Series[1/(1 + ContinuedFractionK[x^Prime[k], 1, {k, 1, nmax}]), {x, 0, nmax}], x]
%Y Cf. A000040, A269353, A285407, A292801.
%K sign
%O 0,8
%A _Ilya Gutkovskiy_, Sep 23 2017
|
