numeric2diag function

Create a diagonal numeric matrix from diagonal elements