sandbox/utility_test_functions.R

In CompEpigen/scMethrix: Fast and efficient summarization of single cell whole genome bisulfate data

### Generic functions to  help with testing #################################
sp2mat <- function(m) {
  
  return(as.matrix(m))  
  
  
}

mat2sp <- function(m) {
  
  return(Matrix(m, sparse=TRUE))
  
}