OFFSET
1,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = (n-1)*binomial(2*n, n-1)*(49*n^3 - 105*n^2 + 62*n - 24 )/( 24*binomial(2*n, 4)) - 2*(2*n-1), for n >= 2, with a(1) = 1. - G. C. Greubel, Jun 17 2024
MATHEMATICA
Table[If[n==1, 1, (n-1)*Binomial[2*n, n-1]*(49*n^3 -105*n^2 +62*n -24 )/(24*Binomial[2*n, 4]) - 2*(2*n-1)], {n, 40}] (* G. C. Greubel, Jun 17 2024 *)
PROG
(Magma) [1] cat [(n-1)*Binomial(2*n, n-1)*(49*n^3 -105*n^2 +62*n -24)/( 24*Binomial(2*n, 4)) -2*(2*n-1): n in [2..40]]; // G. C. Greubel, Jun 17 2024
(SageMath) [1]+[(n-1)*binomial(2*n, n-1)*(49*n^3-105*n^2+62*n-24 )/( 24*binomial(2*n, 4)) -2*(2*n-1) for n in range(2, 41)] # G. C. Greubel, Jun 17 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from Sean A. Irvine, Oct 20 2019
STATUS
approved