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!)
A227312 L.g.f.: log(1 + 2*Sum_{n>=1} 2^n * x^(n^2)). 2
4, -16, 64, -224, 864, -3328, 12800, -49408, 190864, -736896, 2845440, -10987520, 42426752, -163825664, 632592384, -2442673664, 9432071040, -36420732160, 140633977856, -543040041984, 2096879372288, -8096830353408, 31264870391808, -120725281128448, 466165166208064, -1800036911561216, 6950611323771904 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Compare to the logarithm of theta_3(x) = 1 + 2*Sum_{n>=1} x^(n^2)):

log(theta_3(x)) = Sum_{n>=1} -(sigma(2*n) - sigma(n))*(-x)^n/n, where sigma is the sum of divisors of n (A000203).

LINKS

Table of n, a(n) for n=1..27.

EXAMPLE

L.g.f.: L(x) = 4*x - 16*x^2/2 + 64*x^3/3 - 224*x^4/4 + 864*x^5/5 - 3328*x^6/6 + 12800*x^7/7 - 49408*x^8/8 + 190864*x^9/9 - 736896*x^10/10 + 2845440*x^11/11 - 10987520*x^12/12 + 42426752*x^13/13 - 163825664*x^14/14 + 632592384*x^15/15 - 2442673664*x^16/16 +...

where

exp(L(x)) = 1 + 4*x + 8*x^4 + 16*x^9 + 32*x^16 + 64*x^25 + 128*x^36 + 256*x^49 +...

PROG

(PARI) {a(n)=n*polcoeff(log(1+sum(k=1, n, 2*2^k*x^(k^2))+x*O(x^n)), n)}

for(n=1, 36, print1(a(n), ", "))

CROSSREFS

Cf. A227311, A227313, A227315.

Sequence in context: A348906 A177398 A343200 * A267729 A189154 A189336

Adjacent sequences:  A227309 A227310 A227311 * A227313 A227314 A227315

KEYWORD

sign

AUTHOR

Paul D. Hanna, Jul 06 2013

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 21 01:45 EST 2022. Contains 350473 sequences. (Running on oeis4.)