login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A258798 a(n) = [x^n] Product_{k=1..n} (1+x^k)^3 / x^k. 2
1, 3, 12, 62, 327, 1851, 10802, 64440, 391218, 2408001, 14989608, 94197594, 596756374, 3807010920, 24435261432, 157681777148, 1022391454116, 6657413851086, 43517229086467, 285447137446989, 1878287880309900, 12395149957521672, 82014499806039711 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

Table of n, a(n) for n=0..22.

FORMULA

a(n) ~ c * d^n / n^(3/2), where d = 7.036711302278424796297167109247361745558645910729132828752853658917..., c = 2.3254811458... .

MATHEMATICA

Table[SeriesCoefficient[Product[(1+x^k)^3/x^k, {k, 1, n}], {x, 0, n}], {n, 0, 30}]

Table[SeriesCoefficient[Product[1+x^k, {k, 1, n}]^3, {x, 0, n*(n+3)/2}], {n, 0, 30}]

(* A program to compute the constant d *) (1+r)^3/r^2 /.FindRoot[-Pi^2/12 - Log[r]^2/3 + 1/2*Log[1+r]^2 + PolyLog[2, 1/(1+r)] == 0, {r, E}, WorkingPrecision->100]

CROSSREFS

Cf. A258797, A258799.

Sequence in context: A331616 A158691 A038171 * A074516 A045740 A187820

Adjacent sequences:  A258795 A258796 A258797 * A258799 A258800 A258801

KEYWORD

nonn

AUTHOR

Vaclav Kotesovec, Jun 10 2015

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 September 20 06:32 EDT 2021. Contains 347577 sequences. (Running on oeis4.)