login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A156665
Triangle read by rows, A156663 * A007318
2
1, 1, 1, 3, 2, 1, 3, 5, 3, 1, 7, 8, 8, 4, 1, 7, 15, 16, 12, 5, 1, 15, 22, 31, 28, 17, 6, 1, 15, 37, 53, 59, 45, 23, 7, 1, 31, 52, 90, 112, 104, 68, 30, 8, 1, 31, 83, 142, 202, 216, 172, 98, 38, 9, 1, 63, 114, 225, 344, 418, 388, 270, 136, 47, 10, 1
OFFSET
0,4
COMMENTS
Row sums = A122746: (1, 2, 6, 12, 28, 56, 120,...).
LINKS
Robert Israel, Table of n, a(n) for n = 0..10010 (first 141 rows, flattened)
FORMULA
Triangle read by rows, A156663 * A007318
G.f. for triangle: 1/((1-2*x^2)*(1-x-x*y)). - Robert Israel, Aug 10 2015
EXAMPLE
First few rows of the triangle =
1;
1, 1;
3, 2, 1;
3, 5, 3, 1;
7, 8, 8, 4, 1;
7, 15, 16, 12, 5, 1;
15, 22, 31, 28, 17, 6, 1;
15, 37, 53, 59, 45, 23, 7, 1;
31, 52, 90, 112, 104, 68, 30, 8, 1;
31, 83, 142, 202, 216, 172, 98, 38, 9, 1;
63, 114, 225, 344, 418, 388, 270, 136, 47, 10, 1;
...
MAPLE
N:= 12: # for the first N rows
A156663:= Matrix(N, N, (i, j) -> `if`((i-j)::even, 2^((i-j)/2), 0), shape=triangular[lower]):
A007318:= Matrix(N, N, (i, j) -> binomial(i-1, j-1), shape=triangular[lower]):
seq(seq(P[i, j], j=1..i), i=1..N); # Robert Israel, Aug 10 2015
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Gary W. Adamson, Feb 12 2009
STATUS
approved