A274194 - OEIS

%I #5 Jun 16 2016 14:01:30

%S 1,2,3,4,6,8,10,14,18,23,31,40,52,68,88,114,148,192,249,323,420,545,

%T 707,919,1191,1547,2009,2606,3386,4396,5707,7413,9623,12496,16228,

%U 21069,27363,35531,46139,59920,77806,101043,131215,170392,221283,287355,373168

%N Row sums of the array A274193, defined by g(n,k) = 1 for n >= 0; g(n,k) = 0 if k > n; g(n,k) = g(n-1,k-1) + g(n-1,3k) for n > 0, k > 1.

%C See A274195 for the limit of a(n)/a(n-1).

%e (g(9,k)) = (1,4,4,4,3,2,2,1,1,1), so that a(9) = 23.

%t z = 150; g[n_, 0] = g[n, 0] = 1;

%t g[n_, k_] := g[n, k] = If[k > n, 0, g[n - 1, k - 1] + g[n - 1, 3 k]];

%t t = Table[g[n, k], {n, 0, z}, {k, 0, n}]; w = Map[Total, t];

%Y Cf. A274193, A274195.

%K nonn,easy

%O 0,2

%A _Clark Kimberling_, Jun 14 2016