Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A133691
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A133691 Expansion of (1 - ( phi(-q) * phi(q^2) )^2) / 4 in powers of q where phi() is a Ramanujan theta function. +0
1
1, -2, 4, -6, 6, -8, 8, -6, 13, -12, 12, -24, 14, -16, 24, -6, 18, -26, 20, -36, 32, -24, 24, -24, 31, -28, 40, -48, 30, -48, 32, -6, 48, -36, 48, -78, 38, -40, 56, -36, 42, -64, 44, -72, 78, -48, 48, -24, 57, -62, 72, -84, 54, -80, 72, -48, 80, -60, 60, -144, 62, -64, 104, -6, 84, -96, 68, -108, 96, -96, 72, -78 (list; graph; listen)
OFFSET

1,2

FORMULA

Expansion of (1 - ( eta(q)^2 * eta(q^4)^5 / ( eta(q^2)^3 * eta(q^8)^2 ) )^2) / 4 in powers of q.

a(n) is multiplicative with a(2) = -2, a(2^e) = -6 if e>1, a(p^e) = (p^(e+1) - 1) / (p - 1) if p>2.

EXAMPLE

q - 2*q^2 + 4*q^3 - 6*q^4 + 6*q^5 - 8*q^6 + 8*q^7 - 6*q^8 + 13*q^9 -...

PROGRAM

(PARI) {a(n) = if( n<1, 0, if( n%2, sigma(n), -2 * sumdiv(n/2, d, if(d%4, d))))}

CROSSREFS

-4 * A133690(n) = -(-1)^n * A111973(n) = a(n). -2 * A046897(n) = a(2*n). A008438(n) = a(2*n+1). -6 * A000593(n) = a(4*n). A112610(n) = a(4*n+1). 4 * A097723(n) = a(4*n+3).

Sequence in context: A131450 A114218 A111973 this_sequence A092517 A128558 A090346

Adjacent sequences: A133688 A133689 A133690 this_sequence A133692 A133693 A133694

KEYWORD

sign,mult

AUTHOR

Michael Somos, Sep 20 2007

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 December 4 20:00 EST 2008. Contains 151309 sequences.


AT&T Labs Research