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!)
A184366 G.f.: eta(x)^3*(1 - x*eta'(x)/eta(x)), where eta(x) is Dedekind's eta(q) function without the q^(1/24) factor. 4
1, -2, 0, 0, 0, 0, 7, 0, 0, 0, -21, 0, 0, 0, 0, 44, 0, 0, 0, 0, 0, -78, 0, 0, 0, 0, 0, 0, 125, 0, 0, 0, 0, 0, 0, 0, -187, 0, 0, 0, 0, 0, 0, 0, 0, 266, 0, 0, 0, 0, 0, 0, 0, 0, 0, -364, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 483, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -625, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 792, 0, 0 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

Seiichi Manyama, Table of n, a(n) for n = 0..1000

FORMULA

G.f.: A(x) = Sum_{n>=0} -(-1)^n * (n-2)(n+3)(2n+1)/6 * x^(n(n+1)/2).

EXAMPLE

G.f.: A(x) = 1 - 2*x + 7*x^6 - 21*x^10 + 44*x^15 - 78*x^21 +...

A(x) = eta(x)^3*[1 - x*d/dx log(eta(x))] where

eta(x)^3 = 1 - 3*x + 5*x^3 - 7*x^6 + 9*x^10 - 11*x^15 +...+ (-1)^n*(2n+1)*x^(n(n+1)/2) +...

1 - x*d/dx log(eta(x)) = 1 + x + 3*x^2 + 4*x^3 + 7*x^4 + 6*x^5 + 12*x^6 + 8*x^7 + 15*x^8 +...+ sigma(n)*x^n +...

PROG

(PARI) {a(n)=polcoeff(sum(m=0, n, -(-1)^m*(m-2)*(m+3)*(2*m+1)/6*x^(m*(m+1)/2)), n)}

(PARI) {a(n)=polcoeff(eta(x+x*O(x^n))^3*(1-x*deriv(log(eta(x+x*O(x^n))))), n)}

CROSSREFS

Cf. A000203, A184363, A184365, A283334.

Sequence in context: A318329 A107503 A350731 * A230614 A230730 A299905

Adjacent sequences: A184363 A184364 A184365 * A184367 A184368 A184369

KEYWORD

sign

AUTHOR

Paul D. Hanna, Jan 17 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 5 19:48 EST 2023. Contains 360087 sequences. (Running on oeis4.)