cp's OEIS Frontend

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

%I A174667 #4 Jun 02 2025 02:44:43
%S A174667 1,1,1,1,12,1,1,56,56,1,1,216,336,216,1,1,776,1526,1526,776,1,1,2700,
%T A174667 6228,7848,6228,2700,1,1,9236,24146,35486,35486,24146,9236,1,1,31248,
%U A174667 90960,150432,174624,150432,90960,31248,1,1,104816,336206,614846,796286
%N A174667 Sequence A154692 adjusted to leading one:t(n,m)=A154692(n,m)-A154692(n,0)+1.
%C A174667 Row sums are:
%C A174667 1, 2, 14, 114, 770, 4606, 25706, 137738, 719906, 3704310, 18870458,...
%F A174667 t(n,m)=A154692(n,m)-A154692(n,0)+1
%e A174667 {1},
%e A174667 {1, 1},
%e A174667 {1, 12, 1},
%e A174667 {1, 56, 56, 1},
%e A174667 {1, 216, 336, 216, 1},
%e A174667 {1, 776, 1526, 1526, 776, 1},
%e A174667 {1, 2700, 6228, 7848, 6228, 2700, 1},
%e A174667 {1, 9236, 24146, 35486, 35486, 24146, 9236, 1},
%e A174667 {1, 31248, 90960, 150432, 174624, 150432, 90960, 31248, 1},
%e A174667 {1, 104816, 336206, 614846, 796286, 796286, 614846, 336206, 104816, 1},
%e A174667 {1, 348948, 1224588, 2454168, 3478008, 3859032, 3478008, 2454168, 1224588, 348948, 1}
%t A174667 a = 2; b = 3;
%t A174667 t[n_, m_] = (a^m*b^(n - m) + b^m*a^(n - m))*Binomial[n, m];
%t A174667 Table[Table[t[n, m] - t[n, 0] + 1, {m, 0, n}], {n, 0, 10}];
%t A174667 Flatten[%]
%Y A174667 A154692(n, m)
%K A174667 nonn,tabl,uned
%O A174667 0,5
%A A174667 _Roger L. Bagula_, Mar 26 2010