transpose sparse matrix r