A096039 - OEIS

A096039

Triangle read by rows: T(n,k) = (n+1,k)-th element of (M^5-M)/4, where M is the infinite lower Pascal's triangle matrix, 1<=k<=n.

1, 6, 2, 31, 18, 3, 156, 124, 36, 4, 781, 780, 310, 60, 5, 3906, 4686, 2340, 620, 90, 6, 19531, 27342, 16401, 5460, 1085, 126, 7, 97656, 156248, 109368, 43736, 10920, 1736, 168, 8, 488281, 878904, 703116, 328104, 98406, 19656, 2604, 216, 9, 2441406

(list; table; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

Table of n, a(n) for n=1..46.

EXAMPLE

Triangle begins:

6, 2;

31, 18, 3;

156, 124, 36, 4;

781, 780, 310, 60, 5;

3906, 4686, 2340, 620, 90, 6;

MAPLE

P:= proc(n) option remember; local M; M:= Matrix(n, (i, j)-> binomial(i-1, j-1)); (M^5-M)/4 end: T:= (n, k)-> P(n+1)[n+1, k]: seq(seq(T(n, k), k=1..n), n=1..11); # Alois P. Heinz, Oct 07 2009

MATHEMATICA

max = 11; M = Table[If[k > n, 0, Binomial[n, k]], {n, 0, max}, {k, 0, max} ];

T = (MatrixPower[M, 5] - M)/4;

Table[T[[n + 1]][[1 ;; n]] , {n, 1, max}] // Flatten (* Jean-François Alcover, May 24 2016 *)

CROSSREFS

Cf. A007318. First column gives A003463. Row sums give A016129.

Sequence in context: A176591 A362989 A191703 * A201229 A038256 A373829

Adjacent sequences: A096036 A096037 A096038 * A096040 A096041 A096042

KEYWORD

nonn,tabl

AUTHOR

Gary W. Adamson, Jun 17 2004

EXTENSIONS

Edited with more terms by Alois P. Heinz, Oct 07 2009

STATUS

approved