cp's OEIS Frontend

A176284 Triangle T(n,k) = 1 + 3*n*k*(n-k) read by rows.

%I A176284 #16 Sep 08 2022 08:45:52
%S A176284 1,1,1,1,7,1,1,19,19,1,1,37,49,37,1,1,61,91,91,61,1,1,91,145,163,145,
%T A176284 91,1,1,127,211,253,253,211,127,1,1,169,289,361,385,361,289,169,1,1,
%U A176284 217,379,487,541,541,487,379,217,1,1,271,481,631,721,751,721,631,481,271,1
%N A176284 Triangle T(n,k) = 1 + 3*n*k*(n-k) read by rows.
%C A176284 This could be written T(n,k) = 1 - (n-k)^3 - k^3 + n^3, where squares (instead of cubes) would define A130154.
%C A176284 Row sums are {1, 2, 9, 40, 125, 306, 637, 1184, 2025, 3250, 4961, ...} = (n+1)^2*(n^2 -2*n +2)/2.
%H A176284 G. C. Greubel, <a href="/A176284/b176284.txt">Rows n = 0..100 of triangle, flattened</a>
%F A176284 T(n,k) = T(n,n-k).
%F A176284 T(n,k) = 1 + 3*n*k*(n-k).
%e A176284 Triangle begins as:
%e A176284   1;
%e A176284   1,   1;
%e A176284   1,   7,   1;
%e A176284   1,  19,  19,   1;
%e A176284   1,  37,  49,  37,   1;
%e A176284   1,  61,  91,  91,  61,   1;
%e A176284   1,  91, 145, 163, 145,  91,   1;
%e A176284   1, 127, 211, 253, 253, 211, 127,   1;
%e A176284   1, 169, 289, 361, 385, 361, 289, 169,   1;
%e A176284   1, 217, 379, 487, 541, 541, 487, 379, 217,   1;
%e A176284   1, 271, 481, 631, 721, 751, 721, 631, 481, 271, 1;
%p A176284 seq(seq(1 + 3*n*k*(n-k), k=0..n), n=0..12); # _G. C. Greubel_, Nov 25 2019
%t A176284 Flatten[Table[1+3n k(n-k),{n,0,20},{k,0,n}]] (* _Harvey P. Dale_, Jul 03 2013 *)
%o A176284 (PARI) T(n,k) = 1 + 3*n*k*(n-k); \\ _G. C. Greubel_, Nov 25 2019
%o A176284 (Magma) [1 + 3*n*k*(n-k): k in [0..n], n in [0..12]]; // _G. C. Greubel_, Nov 25 2019
%o A176284 (Sage) [[1 + 3*n*k*(n-k) for k in (0..n)] for n in (0..12)] # _G. C. Greubel_, Nov 25 2019
%o A176284 (GAP) Flat(List([0..12], n-> List([0..n], k-> 1 + 3*n*k*(n-k) ))); # _G. C. Greubel_, Nov 25 2019
%Y A176284 Cf. A130154.
%K A176284 nonn,tabl,easy
%O A176284 0,5
%A A176284 _Roger L. Bagula_, Apr 14 2010
%E A176284 Edited by _R. J. Mathar_, May 03 2013