|
|
A005317
|
|
a(n) = (2^n + C(2*n,n))/2.
(Formerly M1460)
|
|
9
|
|
|
1, 2, 5, 14, 43, 142, 494, 1780, 6563, 24566, 92890, 353740, 1354126, 5204396, 20066492, 77575144, 300572963, 1166868646, 4537698722, 17672894044, 68923788698, 269129985796, 1052051579012, 4116719558104, 16123810230158, 63205319996092, 247959300028484
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
a(n) is the number of lattice paths from (0,0) to (n,n) using E(1,0) and N(0,1) as steps that horizontally cross the diagonal y = x with even many times. For example, a(2) = 5 because there are 6 paths in total and only one of them horizontally crosses the diagonal with odd many times, namely, NEEN. - Ran Pan, Feb 01 2016
|
|
REFERENCES
|
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1/2)*(-4*x+1+(-(4*x-1)*(2*x-1)^2)^(1/2))/(4*x-1)/(2*x-1).
Recurrence: 0 = (-24-28*n-8*n^2)*a(n+1) + (18+22*n+6*n^2)*a(n+2) + (-3-4*n-n^2)*a(n+3), a(0)=1, a(1)=2, a(2)=5. (End)
a(n) = Sum_{k=0..floor(n/2)} (-1)^k*C(2*n, n-2*k), n > 0. - Mircea Merca, Jun 20 2011
E.g.f.: (exp(2*x)*(1+BesselI(0,2*x))/2 = G(0)/2; G(k) = 1 + (k)!/(P-2*x*(2*k+1)*(P^2)/(2*x*(2*k+1)*P+(k+1)^2*k!/G(k+1))), where P:=((2*k)!)/(2^k)/((k)!) (continued fraction). - Sergei N. Gladkovskii, Dec 20 2011
a(n) = Sum_{r=0..n} k*(k+1)/2 where k=C(n,r). - J. M. Bergot, Sep 04 2013
|
|
MAPLE
|
f := n->(2^n+binomial(2*n, n))/2;
|
|
MATHEMATICA
|
|
|
PROG
|
(Magma) [(2^n+Binomial(2*n, n))/2: n in [0..26]]; // Bruno Berselli, Jun 20 2011
(Maxima) makelist(sum((-1)^k*binomial(2*n, n-2*k), k, 0, floor(n/2)), n, 0, 26); \\ Bruno Berselli, Jun 20 2011
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|