login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A285245 Expansion of Product_{k>=1} 1/(1 - k*x^(k^2)). 4
1, 1, 1, 1, 3, 3, 3, 3, 7, 10, 10, 10, 18, 24, 24, 24, 44, 56, 65, 65, 105, 129, 147, 147, 227, 292, 328, 355, 515, 645, 717, 771, 1107, 1367, 1562, 1670, 2429, 2949, 3339, 3555, 5073, 6181, 6961, 7546, 10582, 13059, 14619, 15789, 21925, 26886, 30235, 32575 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,5

LINKS

Vaclav Kotesovec, Table of n, a(n) for n = 0..10000

FORMULA

a(n) ~ c * 2^(n/4), where

c = 6.362854320457366874306510139107365081972383711876544726... if mod(n,4)=0

c = 6.470997903106304472752360748461108347899808941622559468... if mod(n,4)=1

c = 6.154059402265470959096395812318265046714869376472639022... if mod(n,4)=2

c = 5.624747659153211728892605407048217108787120474872434485... if mod(n,4)=3

MATHEMATICA

nmax = 100; CoefficientList[Series[Product[1/(1 - k*x^(k^2)), {k, 1, nmax}], {x, 0, nmax}], x]

CROSSREFS

Cf. A001156, A006906, A285243, A285244.

Sequence in context: A244584 A092531 A125002 * A098528 A242715 A078229

Adjacent sequences:  A285242 A285243 A285244 * A285246 A285247 A285248

KEYWORD

nonn

AUTHOR

Vaclav Kotesovec, Apr 15 2017

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 July 20 22:20 EDT 2019. Contains 325189 sequences. (Running on oeis4.)