OFFSET
3,1
LINKS
Andrew Howroyd, Table of n, a(n) for n = 3..200
FORMULA
a(n) = 2*(n-1)*binomial(2*n-2, n-3).
a(n) = A114593(n^2).
a(n) = 4*A002055(n+3). - Alois P. Heinz, May 21 2015
From Benedict W. J. Irwin, Jul 13 2016: (Start)
G.f.: 2*(s-1+x*(7-5*s+2*x*(2*s-6+x)))/(s^3x^2), where s=sqrt(1-4*x).
E.g.f: 2*E^(2*x)*x*(BesselI(1,2*x)+2*BesselI(2,2*x)+BesselI(3,2*x)).
(End)
MATHEMATICA
a[n_] := 2 Sum[Sum[
Binomial[j + k, k]*Binomial[2 n - k - j - 1, n - k + 1], {k,
n}], {j, 0, n - 2}]
CoefficientList[Series[(2(-1+Sqrt[1-4x]+x(7-5Sqrt[1-4x] +2x(-6+2Sqrt[ 1-4x] +x))))/ ((1-4x)^(3/2)x^2), {x, 0, 20}], x] (* Benedict W. J. Irwin, Jul 13 2016 *)
PROG
(PARI) a(n) = 2*n*binomial(2*n, n-2) \\ Charles R Greathouse IV, May 21 2015
CROSSREFS
KEYWORD
nonn,walk
AUTHOR
Theodore M. Mishura, May 12 2015
EXTENSIONS
Terms a(22) and beyond from Andrew Howroyd, Nov 05 2019
STATUS
approved