Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A123649
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A123649 Expansion of eta(q)eta(q^12)^3/(eta(q^4)eta(q^3)^3) in powers of q. +0
1
1, -1, -1, 3, -2, -3, 8, -5, -7, 18, -12, -15, 38, -24, -30, 75, -46, -57, 140, -86, -104, 252, -152, -183, 439, -262, -313, 744, -442, -522, 1232, -725, -852, 1998, -1168, -1365, 3182, -1852, -2150, 4986, -2886, -3336, 7700, -4436, -5106, 11736, -6736, -7719, 17673, -10103, -11538, 26322 (list; graph; listen)
OFFSET

1,4

FORMULA

Euler transform of period 12 sequence [ -1, -1, 2, 0, -1, 2, -1, 0, 2, -1, -1, 0, ...].

G.f. A(x) satisfies 0=f(A(x), A(x^2)) where f(u, v)= u^2 -v*(1-2*(u+v)+4*u*v).

PROGRAM

(PARI) {a(n)=local(A); if(n<1, 0, n--; A=x*O(x^n); polcoeff( eta(x+A)*eta(x^12+A)^3/eta(x^3+A)^3/eta(x^4+A), n))}

CROSSREFS

Sequence in context: A071010 A073341 A070982 this_sequence A080848 A016602 A131134

Adjacent sequences: A123646 A123647 A123648 this_sequence A123650 A123651 A123652

KEYWORD

sign

AUTHOR

Michael Somos, Oct 04 2006

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified November 30 13:13 EST 2009. Contains 167758 sequences.


AT&T Labs Research