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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A185168 G.f. A(x) where A000081(x) = x*A(A000081(x)). 0
 1, 1, 1, 0, 0, -1, 3, -5, 7, -8, 1, 24, -62, 82, -60, 52, -242, 877, -1979, 2747, -924, -7309, 28389, -79469, 205108, -468281, 821680, -772531, -1046280, 6962678, -19516746, 39741239, -63920180, 75119743, -21689924, -219360085, 866264658, -2165202646, 4125523796, -6023253532 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,7 LINKS Table of n, a(n) for n=0..39. Vladimir Kruchinin, D. V. Kruchinin, Composita and their properties, arXiv:1103.2582 [math.CO], 2011-2013. MATHEMATICA m = maxExponent = 31; A81[_] = 0; Do[A81[x_] = x*Exp[Sum[A81[x^k]/k, {k, 1, m}] + O[x]^m] // Normal, {m}]; A[x_] = Sum[a[k] x^k, {k, 0, m}]; cc = CoefficientList[A81[x] - x A[A81[x]] + O[x]^m, x]; Table[a[n], {n, 0, m-2}] /. Solve[Thread[cc == 0]] // First (* Jean-François Alcover, Aug 08 2018 *) CROSSREFS Sequence in context: A201088 A201042 A142340 * A131979 A335894 A101496 Adjacent sequences: A185165 A185166 A185167 * A185169 A185170 A185171 KEYWORD sign AUTHOR Vladimir Kruchinin, Feb 19 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.

Last modified September 24 00:14 EDT 2023. Contains 365554 sequences. (Running on oeis4.)