[go: up one dir, main page]

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!)
Revision History for A096920 (Underlined text is an addition; strikethrough text is a deletion.)

Showing entries 1-10 | older changes
A096920 Expansion of q^(-1/12) * eta(q^2)^4 / (eta(q)^2 * eta(q^4)) in powers of q.
(history; published version)
#18 by Charles R Greathouse IV at Fri Mar 12 22:24:43 EST 2021
LINKS

M. Michael Somos, <a href="/A010815/a010815.txt">Introduction to Ramanujan theta functions</a>

Discussion
Fri Mar 12 22:24
OEIS Server: https://oeis.org/edit/global/2897
#17 by N. J. A. Sloane at Wed Nov 13 21:58:47 EST 2019
LINKS

M. Somos, <a href="http://somos.crg4.com="/A010815/multiqa010815.htmltxt">Introduction to Ramanujan theta functions</a>

Discussion
Wed Nov 13 21:58
OEIS Server: https://oeis.org/edit/global/2832
#16 by Susanna Cuyler at Thu May 10 23:06:35 EDT 2018
STATUS

proposed

approved

#15 by Michel Marcus at Thu May 10 00:59:02 EDT 2018
STATUS

editing

proposed

#14 by Michel Marcus at Thu May 10 00:58:59 EDT 2018
LINKS

M. Somos, <a href="http://cissomos.csuohiocrg4.edu/~somoscom/multiq.pdfhtml">Introduction to Ramanujan theta functions</a>

STATUS

proposed

editing

#13 by G. C. Greubel at Thu May 10 00:52:29 EDT 2018
STATUS

editing

proposed

#12 by G. C. Greubel at Thu May 10 00:51:49 EDT 2018
LINKS

G. C. Greubel, <a href="/A096920/b096920.txt">Table of n, a(n) for n = 0..1000</a>

MATHEMATICA

eta[q_]:= q^(1/24)*QPochhammer[q]; a:= CoefficientList[Series[q^(-1/12) *eta[q^2]^4/(eta[q]^2*eta[q^4]), {q, 0, 50}], q]; Table[a[[n]], {n, 0, 50}] (* G. C. Greubel, May 09 2018 *)

STATUS

approved

editing

#11 by Vaclav Kotesovec at Mon Sep 07 11:07:28 EDT 2015
STATUS

editing

approved

#10 by Vaclav Kotesovec at Mon Sep 07 11:04:18 EDT 2015
FORMULA

a(n) ~ exp(Pi*sqrt(n/6)) / (2*sqrt(2*n)). - Vaclav Kotesovec, Sep 07 2015

#9 by Vaclav Kotesovec at Mon Sep 07 11:01:38 EDT 2015
MATHEMATICA

nmax = 40; CoefficientList[Series[Product[(1 - x^(4*k)) * (1 + x^(2*k-1))^2, {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Sep 07 2015 *)

STATUS

approved

editing

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 August 30 13:06 EDT 2024. Contains 375543 sequences. (Running on oeis4.)