This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A107657 Coefficients of 12th root of theta series of lattice in A004046. 3
 1, 0, 0, 2184, 44226, 530712, -22289904, -1041080040, -23414482728, 86664734520, 22704271546320, 824932708688088, 10338270616438674, -363177176817506688, -24534229526034608016, -614775613733783853624, -526997882017733986314, 591470477348411755418688, 24257417213770154760619728, 384176112414487265101313448 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,4 LINKS Vincenzo Librandi, Table of n, a(n) for n = 0..200 N. Heninger, E. M. Rains and N. J. A. Sloane, On the Integrality of n-th Roots of Generating Functions, J. Combinatorial Theory, Series A, 113 (2006), 1732-1745. MATHEMATICA terms = 20; QP = QPochhammer; Q9 = (1 + (9*q*QP[q^9]^3)/QP[q]^3); s = (1/(3^(1/4)*QP[q^3]))*QP[q]^3*(-8 + 16*Q9^3 + 64*Q9^6 - 72*Q9^9 + 27*Q9^12)^(1/12) + O[q]^terms; CoefficientList[s, q] (* Jean-François Alcover, Jul 06 2017, after Michael Somos *) CROSSREFS Cf. A004046. Sequence in context: A090318 A130171 A194585 * A002521 A059757 A068304 Adjacent sequences:  A107654 A107655 A107656 * A107658 A107659 A107660 KEYWORD sign AUTHOR N. J. A. Sloane and Michael Somos, Jun 07 2005 STATUS approved

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

Last modified May 21 01:26 EDT 2019. Contains 323429 sequences. (Running on oeis4.)