A295074 Numerator of the coefficient of the n-th term of the power expansion near x = 0 of sqrt(1+1/sqrt(1-x))/sqrt(2).
1, 11, 69, 1843, 12767, 181215, 1308365, 76546627, 565400891, 8419185989, 63092292851, 1901486819127, 14392588079947, 218735248662407, 1667806937019357, 204072937168787299, 1564753338846234067, 24051971232321138025, 185239367598020901335, 5717329190017842492029
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..500
Crossrefs
Cf. A061548 (similar coefficients but for a different function).
Programs
-
Maple
seq(numer(coeff(series(sqrt(1+1/sqrt(1-x))/sqrt(2), x,25),x,n)),n=1..20); # Muniru A Asiru, May 30 2018
-
Mathematica
Table[Numerator[SeriesCoefficient[Series[(Sqrt[1 + 1/Sqrt[1 - x]]/Sqrt[2]), {x, 0, n}], n]], {n, 1, 20}]