0,4

G.f.: A(x) = 1 + x/B(x); B(x) = 1 + x/C(x)^2; C(x) = 1 + x/D(x)^3;

D(x) = 1 + x/E(x)^4; E(x) = 1 + x/F(x)^5; ...

where the respective sequences begin:

B=[1,1,-2,9,-58,472,-4584,51481,-655244,9318663,...];

C=[1,1,-3,18,-148,1491,-17496,232556,-3441024,56009937,...];

D=[1,1,-4,30,-300,3605,-49656,763968,-12920820,237676330,...];

E=[1,1,-5,45,-530,7400,-117096,2048865,-39048150,802555995,...];

F=[1,1,-6,63,-854,13587,-242928,4766594,-101163336,...].

(PARI) {a(n)=local(A=1+x+x*O(x^n)); for(j=0, n-1, A=1+x/A^(n-j)); polcoeff(A, n)}

Cf. A095793 (variant).

Sequence in context: A051818 A091102 A132624 this_sequence A038170 A007840 A007549

Adjacent sequences: A121584 A121585 A121586 this_sequence A121588 A121589 A121590

sign

Paul D. Hanna (pauldhanna(AT)juno.com), Aug 09 2006