login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A192058 G.f. S(x) satisfies: C(C(x)) + S(S(x)) = x where S(C(x)) = 2*x*C(x). 3
0, 2, 0, 0, 8, 0, 0, 256, 0, 0, 13312, 0, 0, 868352, 0, 0, 65436672, 0, 0, 5467537408, 0, 0, 494982725632, 0, 0, 47850676551680, 0, 0, 4890933182070784, 0, 0, 524842319048867840, 0, 0, 58818757243307032576, 0, 0, 6856543871374119141376 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
FORMULA
Functions C(x) and S(x) satisfy:
(1) C'(C(x))*C'(x) + S'(S(x))*S'(x) = 1,
(2) S'(C(x))*C'(x) = 2*C(x) + 2*x*C'(x).
EXAMPLE
G.f.: S(x) = 2*x^2 + 8*x^5 + 256*x^8 + 13312*x^11 + 868352*x^14 + 65436672*x^17 +...
Related expansions are
C(x) = x - 4*x^4 - 64*x^7 - 2432*x^10 - 125952*x^13 - 8086016*x^16 +...
C(C(x)) = x - 8*x^4 - 64*x^7 - 2432*x^10 - 119808*x^13 - 7774208*x^16 +...
S(S(x)) = 8*x^4 + 64*x^7 + 2432*x^10 + 119808*x^13 + 7774208*x^16 +...
S(C(x)) = 2*x^2 - 8*x^5 - 128*x^8 - 4864*x^11 - 251904*x^14 - 16172032*x^17 +...
PROG
(PARI) {a(n)=local(C=x, S=2*x^2, Cv=[1]);
for(i=0, n\3, Cv=concat(Cv, [0, 0, 0]); C=x*Ser(Cv); S=2*x*serreverse(C);
Cv[#Cv]=-polcoeff((subst(C, x, C)+subst(S, x, S))/2, #Cv); ); polcoeff(S, n)}
CROSSREFS
Cf. A192057 (C(x)), A192059 (C(C(x))), A191418 (variant).
Sequence in context: A198232 A160213 A354661 * A021502 A319568 A334411
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Jun 21 2011
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 24 02:20 EST 2024. Contains 370288 sequences. (Running on oeis4.)