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!)
A308381 Expansion of e.g.f. exp(Sum_{k>=1} x^(k^2)*(2 + x^(k^2))/(2*k^2)). 1
1, 1, 2, 4, 16, 56, 256, 1072, 11264, 119296, 1075456, 9088256, 85292032, 894690304, 8968964096, 90882789376, 2409397682176, 40515889528832, 1051789297844224, 16251803853193216, 302342408330018816, 4444559976664662016, 84010278329827459072, 1289319649553742823424 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,3
LINKS
FORMULA
E.g.f.: exp(Sum_{k>=1} A053866(k)*x^k/k).
E.g.f.: Product_{k>=1} 1/(1 - x^(2*k-1))^(lambda(2*k-1)/(2*k-1)), where lambda() is the Liouville function (A008836).
MATHEMATICA
nmax = 23; CoefficientList[Series[Exp[Sum[x^(k^2) (2 + x^(k^2))/(2 k^2), {k, 1, nmax}]], {x, 0, nmax}], x] Range[0, nmax]!
nmax = 23; CoefficientList[Series[Product[1/(1 - x^(2 k - 1))^(LiouvilleLambda[2 k - 1]/(2 k - 1)), {k, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]!
CROSSREFS
Sequence in context: A053498 A005388 A053503 * A153957 A068789 A009624
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, May 23 2019
STATUS
approved

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 June 21 21:50 EDT 2024. Contains 373559 sequences. (Running on oeis4.)