Create/extract 'reverse'-diagonal matrix or off-diagonal elements
revdiag(x,...)
offdiag(x,type=0,...)
revdiag(x,...) <- value
offdiag(x,type=0,...) <- value
vector
additional arguments to lower level functions
For the assignment function the values to put in the diagonal
0: upper and lower triangular, 1: upper triangular, 2: lower triangular, 3: upper triangular + diagonal, 4: lower triangular + diagonal