cp's OEIS Frontend

A137713 Row sums of triangle A137712.

%I A137713 #6 Aug 20 2018 16:47:05
%S A137713 1,2,3,5,7,12,18,30,48,78,126,205,331,536,868,1404,2272,3676,5948,
%T A137713 9624,15572,25195,40767,65962,106729,172690,279419,452109,731528,
%U A137713 1183637,1915165,3098802,5013967,8112769,13126737,21239506,34366243,55605749,89971992,145577742,235549734,381127476,616677210
%N A137713 Row sums of triangle A137712.
%C A137713 a(n)/a(n-1) tends to phi.
%H A137713 Robert Israel, <a href="/A137713/b137713.txt">Table of n, a(n) for n = 1..1000</a>
%e A137713 a(6) = 12 = sum of row 6 terms of triangle A137712: (8 + 2 + 1 + 0 + 0 + 1).
%p A137713 for n from 1 to 100 do
%p A137713   T[n,1]:= combinat:-fibonacci(n);
%p A137713   for k from 2 to n do
%p A137713     if n >= 2*k-1 then T[n,k]:= T[n-1,k-1] - T[n-k,k-1]
%p A137713     else T[n,k]:= T[n-1,k-1]
%p A137713     fi
%p A137713   od:
%p A137713 od:
%p A137713 seq(add(T[n,k],k=1..n),n=1..100); # _Robert Israel_, Aug 20 2018
%Y A137713 Cf. A137712.
%K A137713 nonn
%O A137713 1,2
%A A137713 _Gary W. Adamson_, Feb 08 2008
%E A137713 Corrected and extended by _Robert Israel_, Aug 20 2018