rdiag function

right (i.e., post) Multiply a matrix by a diagonal matrix