|
%I #9 Nov 16 2019 02:32:51
%S 3,10,36,132,490,1836,6930,26312,100386,384540,1478048,5697720,
%T 22019556,85284920,330961950,1286562960,5009003250,19528599420,
%U 76231136520,297910080600,1165429743660,4563490674600,17884841191620,70148829799152,275344923755700,1081512966189656,4250730282412320
%N First differences of A051924, or second differences of Central binomial coefficients A000984.
%F a(n) = A051924(n) - A051924(n-1) = A000984(n+2) - 2*A000984(n+1) + A000984(n).
%t Differences[#, 2] &@ Array[Binomial[2 #, #] &, 29, 0] (* _Michael De Vlieger_, Nov 15 2019 *)
%o (PARI) C=vector(30,n,binomial(2*n--,n));C=C[^1]-C[^-1];C=C[^1]-C[^-1]
%Y Cf. A000984, A051924, A163771, A094796.
%K nonn
%O 0,1
%A _M. F. Hasler_, Nov 15 2019
|
