A046814 Row sums of triangle A046527.
1, 2, 8, 37, 179, 881, 4369, 21746, 108444, 541362, 2704158, 13512392, 67534828, 337584992, 1687627800, 8437136085, 42182258715, 210899507685, 1054456597965, 5272139698215, 26360193558735, 131799177579015
Offset: 0
Links
- G. C. Greubel, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[n le 1 select 1 else 5*Self(n-1) - 3*Catalan(n-1)/(2*n-3): n in [1..40]]; // G. C. Greubel, Jul 28 2024
-
Mathematica
CoefficientList[Series[(1-4*x)*(1-Sqrt[1-4*x])/(2*x*(1-5*x)), {x,0,40}], x] (* G. C. Greubel, Jul 28 2024 *)
-
SageMath
@CachedFunction def A046814(n): return 1 if n==0 else 5*A046814(n-1) - 3*catalan_number(n)/(2*n-1) [A046814(n) for n in range(41)] # G. C. Greubel, Jul 28 2024
Formula
Extensions
Offset corrected by Sean A. Irvine, Apr 25 2021
Comments