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!)
A154242 Denominators of the coefficients of the polynomials 1/Sum_{n>=1} x^(n-1)/((2*n)!/n!) = 2*exp(-x/4)*sqrt(x)/ (sqrt(Pi)*erf(sqrt(x)/2)). 1
1, 3, 45, 1890, 56700, 748440, 10216206000, 8756748000, 2841962760000, 24946749107280000, 8232427205402400000, 103279541304139200000, 3101484625363300176000000, 1431454442475369312000000 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,2
LINKS
FORMULA
a(n) = denominator([x^n]*(1/Sum_{k>=1} x^(k-1)/((2*k)!/k!)).
a(n) = denominator([x^n]*2*exp(-x/4)*sqrt(x)/(sqrt(Pi)*erf(sqrt(x)/2)))).
MATHEMATICA
p[x] := FullSimplify[1/Sum[x^(n - 1)/((2*n)!/n!), {n, 1, Infinity}]];
Table[ Denominator[SeriesCoefficient[Series[p[x], {x, 0, 30}], n]], {n, 0, 30}]
Table[Denominator[SeriesCoefficient[Series[2*Exp[-x/4]*Sqrt[x]/(Sqrt[Pi]*Erf[Sqrt[x]/2]), {x, 0, 30}], n]], {n, 0, 50}] (* G. C. Greubel, Sep 07 2016 *)
PROG
(PARI) seq(n)={[denominator(t) | t<-Vec(1/sum(k=1, n, x^(k-1)/((2*k)!/k!), O(x^n)))]} \\ Andrew Howroyd, Nov 02 2019
CROSSREFS
Sequence in context: A012494 A012780 A072503 * A331710 A283698 A163002
KEYWORD
nonn,frac
AUTHOR
Roger L. Bagula, Jan 05 2009
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 March 18 22:56 EDT 2024. Contains 370952 sequences. (Running on oeis4.)