cp's OEIS Frontend

A174669 Sequence A154690 adjusted to leading one:t(n,m)=A154690(n,m)-A154690(n,0)+1.

%I A174669 #4 Jun 02 2025 02:44:49
%S A174669 1,1,1,1,4,1,1,10,10,1,1,24,32,24,1,1,58,88,88,58,1,1,140,236,256,236,
%T A174669 140,1,1,334,628,712,712,628,334,1,1,784,1648,1984,1984,1984,1648,784,
%U A174669 1,1,1810,4240,5536,5536,5536,5536,4240,1810,1,1,4116,10676,15296,15776
%N A174669 Sequence A154690 adjusted to leading one:t(n,m)=A154690(n,m)-A154690(n,0)+1.
%C A174669 Row sums are:
%C A174669 1, 2, 6, 22, 82, 294, 1010, 3350, 10818, 34246, 106834,...
%F A174669 t(n,m)=A154690(n,m)-A154690(n,0)+1
%e A174669 {1},
%e A174669 {1, 1},
%e A174669 {1, 4, 1},
%e A174669 {1, 10, 10, 1},
%e A174669 {1, 24, 32, 24, 1},
%e A174669 {1, 58, 88, 88, 58, 1},
%e A174669 {1, 140, 236, 256, 236, 140, 1},
%e A174669 {1, 334, 628, 712, 712, 628, 334, 1},
%e A174669 {1, 784, 1648, 1984, 1984, 1984, 1648, 784, 1},
%e A174669 {1, 1810, 4240, 5536, 5536, 5536, 5536, 4240, 1810, 1},
%e A174669 {1, 4116, 10676, 15296, 15776, 15104, 15776, 15296, 10676, 4116, 1}
%t A174669 a = 2; b = 1;
%t A174669 t[n_, m_] = (a^m*b^(n - m) + b^m*a^(n - m))*Binomial[n, m];
%t A174669 Table[Table[t[n, m] - t[n, 0] + 1, {m, 0, n}], {n, 0, 10}];
%t A174669 Flatten[%]
%Y A174669 A154690(n, m)
%K A174669 nonn,tabl,uned
%O A174669 0,5
%A A174669 _Roger L. Bagula_, Mar 26 2010