The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
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!)
A056545 a(n) = 4*n*a(n-1) + 1 with a(0)=1. 11
1, 5, 41, 493, 7889, 157781, 3786745, 106028861, 3392923553, 122145247909, 4885809916361, 214975636319885, 10318830543354481, 536579188254433013, 30048434542248248729, 1802906072534894923741, 115385988642233275119425 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,2
COMMENTS
For positive n, a(n) equals 4^n times the permanent of the n X n matrix with (5/4)'s along the main diagonal and 1's everywhere else. - John M. Campbell, Jul 10 2011
LINKS
Michael Z. Spivey and Laura L. Steil, The k-Binomial Transforms and the Hankel Transform, Journal of Integer Sequences, Vol. 9 (2006), Article 06.1.1.
FORMULA
a(n) = floor(e^(1/4)*4^n*n!).
From Philippe Deléham, Mar 14 2004: (Start)
a(n) = n!*Sum_{k=0..n} (4^(n-k)/k!.
E.g.f.: exp(x)/(1 - 4*x). (End)
a(n) = Sum_{k=0..n} P(n, k)*4^k. - Ross La Haye, Aug 29 2005
a(n) = hypergeometric_U(1, n+2 , 1/4)/4. - Peter Luschny, Nov 26 2014
a(n) = exp(1/4)*4^n*Gamma(n+1, 1/4). a(n) ~ sqrt(2*Pi)*4^n*n^(n+1/2)*exp(1/4-n). - Vladimir Reshetnikov, Oct 14 2016
From Peter Bala, Mar 01 2017: (Start)
a(n) = Integral_{x = 0..inf} (4*x + 1)^n*exp(-x) dx.
The e.g.f. y = exp(x)/(1 - 4*x) satisfies the differential equation (1 - 4*x)*y' = (5 - 4*x)*y.
a(n) = (4*n + 1)*a(n-1) - 4*(n - 1)*a(n-2).
The sequence b(n) := 4^n*n! also satisfies the same recurrence with b(0) = 1, b(1) = 4. This leads to the continued fraction representation a(n) = 4^n*n!*( 1 + 1/(4 - 4/(9 - 8/(13 - ... - (4*n - 4)/(4*n + 1) )))) for n >= 2. Taking the limit gives the continued fraction representation exp(1/4) = 1 + 1/(4 - 4/(9 - 8/(13 - ... - (4*n - 4)/((4*n + 1) - ... )))). Cf. A010844. (End)
EXAMPLE
a(2) = 4*2*a(1) + 1 = 8*5 + 1 = 41.
MATHEMATICA
Round@Table[Exp[1/4] 4^n Gamma[n + 1, 1/4], {n, 0, 20}] (* Round is equivalent to FullSimplify here, but is much faster; Vladimir Reshetnikov, Oct 14 2016 *)
nxt[{n_, a_}]:={n+1, 4a(n+1)+1}; NestList[nxt, {0, 1}, 20][[All, 2]] (* Harvey P. Dale, Mar 19 2019 *)
CROSSREFS
Cf. A000522, A010844, A010845, A056546, A056547, A001907 for analogs. A056545/(A000142*A000302) is an increasingly good approximation to 4th root of e.
Sequence in context: A240996 A346982 A143415 * A362111 A325888 A347951
KEYWORD
nonn,easy
AUTHOR
Henry Bottomley, Jun 20 2000
EXTENSIONS
More terms from James A. Sellers, Jul 04 2000
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 May 19 14:45 EDT 2024. Contains 372698 sequences. (Running on oeis4.)