cp's OEIS Frontend

A168625 Triangle T(n,k) = 8*binomial(n,k) - 7 with columns 0 <= k <= n.

%I A168625 #16 Sep 08 2022 08:45:49
%S A168625 1,1,1,1,9,1,1,17,17,1,1,25,41,25,1,1,33,73,73,33,1,1,41,113,153,113,
%T A168625 41,1,1,49,161,273,273,161,49,1,1,57,217,441,553,441,217,57,1,1,65,
%U A168625 281,665,1001,1001,665,281,65,1,1,73,353,953,1673,2009,1673,953,353,73,1
%N A168625 Triangle T(n,k) = 8*binomial(n,k) - 7 with columns 0 <= k <= n.
%C A168625 Triangle T(n,k): the coefficient [x^k] of the polynomial 8*(x+1)^n -7*( x^(n+1) - 1)/(x-1).
%H A168625 G. C. Greubel, <a href="/A168625/b168625.txt">Rows n = 0..100 of triangle, flattened</a>
%F A168625 T(n,k) = [x^k] ( 8*(x+1)^n-7*Sum_{s=0..n} x^s ) = 8*A007318(n,k) - 7. - _R. J. Mathar_, Sep 02 2011
%e A168625 Triangle begins as:
%e A168625   1;
%e A168625   1,  1;
%e A168625   1,  9,   1;
%e A168625   1, 17,  17,   1;
%e A168625   1, 25,  41,  25,    1;
%e A168625   1, 33,  73,  73,   33,    1;
%e A168625   1, 41, 113, 153,  113,   41,    1;
%e A168625   1, 49, 161, 273,  273,  161,   49,   1;
%e A168625   1, 57, 217, 441,  553,  441,  217,  57,   1;
%e A168625   1, 65, 281, 665, 1001, 1001,  665, 281,  65,  1;
%e A168625   1, 73, 353, 953, 1673, 2009, 1673, 953, 353, 73, 1;
%p A168625 A168625:= (n,k) -> 8*binomial(n, k) -7; seq(seq(A168625(n, k), k = 0..n), n = 0.. 10); # _G. C. Greubel_, Mar 12 2020
%t A168625 m = 8; p[x_, n_]:= FullSimplify[ExpandAll[m*(x+1)^n -(m-1)(x^(n+1) -1)/(x-1)]];
%t A168625 Table[CoefficientList[p[x, n], x], {n,0,10}]//Flatten
%t A168625 Table[8*Binomial[n, k] -7, {n,0,10}, {k,0,n}]//Flatten (* _G. C. Greubel_, Mar 12 2020 *)
%o A168625 (Magma) [8*Binomial(n, k) -7: k in [0..n], n in [0..10]]; // _G. C. Greubel_, Mar 12 2020
%o A168625 (Sage) [[8*binomial(n, k) -7 for k in (0..n)] for n in (0..10)] # _G. C. Greubel_, Mar 12 2020
%Y A168625 Sequence m*binomial(n,k) - (m-1): A007318 (m=1), A109128 (m=2), A131060 (m=3), A131061 (m=4), A131063 (m=5), A131065 (m=6), A131067 (m=7), this sequence (m=8).
%K A168625 nonn,easy,tabl
%O A168625 0,5
%A A168625 _Roger L. Bagula_, Dec 01 2009
%E A168625 Definition simplified by _R. J. Mathar_, Sep 02 2011