|
|
A133081
|
|
An interpolation operator, companion to A133080.
|
|
3
|
|
|
1, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
A133081 * [1,2,3,...] = A133090: (1, 1, 5, 3, 9, 5, 13, 7, 17, ...).
A133080: diagonal and subdiagonal are switched.
|
|
LINKS
|
|
|
FORMULA
|
Infinite lower triangular matrix, (1,0,1,0,...) in the main diagonal and (1,1,1,...) in the subdiagonal.
|
|
EXAMPLE
|
First few rows of the triangle:
1;
1, 0;
0, 1, 1;
0, 0, 1, 0;
0, 0, 0, 1, 1;
...
|
|
PROG
|
(PARI) row(n) = vector(n, k, if (k==n-1, 1, if (k==n, n%2)));
lista(nn) = my(list=List()); for (n=1, nn, my(v=row(n)); for (k=1, #v, listput(list, v[k]))); Vec(list); \\ Michel Marcus, Mar 06 2022
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|