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!)
A302286 a(n) = [x^n] 1/(1 - n*x - x/(1 - n*x - x/(1 - n*x - x/(1 - n*x - x/(1 - ...))))), a continued fraction. 1

%I #6 Jun 08 2019 11:56:49

%S 1,2,12,116,1530,25422,507696,11814728,313426350,9324499610,

%T 307171539576,11091813369276,435408606414964,18453269887229478,

%U 839464708754178240,40786587211854543120,2107367668847505288726,115352793604678609311282,6667002839420189781109800,405656528458830256952396420

%N a(n) = [x^n] 1/(1 - n*x - x/(1 - n*x - x/(1 - n*x - x/(1 - n*x - x/(1 - ...))))), a continued fraction.

%F a(n) = [x^n] (1 - n*x - sqrt(1 - (2*n + 4)*x + n^2*x^2))/(2*x).

%F a(0) = 1; a(n) = (1/n)*Sum_{k=0..n} (n + 1)^k*binomial(n,k)*binomial(n,k-1).

%F a(n) = A247507(n,n).

%F a(n) ~ exp(2*sqrt(n)) * n^(n - 3/4) / (2*sqrt(Pi)). - _Vaclav Kotesovec_, Jun 08 2019

%t Table[SeriesCoefficient[1/(1 - n x + ContinuedFractionK[-x, 1 - n x, {k, 1, n}]), {x, 0, n}], {n, 0, 19}]

%t Table[SeriesCoefficient[(1 - n x - Sqrt[1 - (2 n + 4) x + n^2 x^2])/(2 x), {x, 0, n}], {n, 0, 19}]

%t Join[{1}, Table[(1/n) Sum[(n + 1)^k Binomial[n, k] Binomial[n, k - 1], {k, 0, n}], {n, 1, 19}]]

%t Table[(n + 1) Hypergeometric2F1[1 - n, -n, 2, n + 1], {n, 0, 19}]

%Y Main diagonal of A247507.

%Y Cf. A006318, A099169, A247496, A292798.

%K nonn

%O 0,2

%A _Ilya Gutkovskiy_, Apr 04 2018

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 28 18:04 EDT 2024. Contains 371254 sequences. (Running on oeis4.)