dgtmatrix code snippets in r