R/getIndex.R

Defines functions getIndex

Documented in getIndex

getIndex <-
function(idx){
  rrow <- ceiling((-1 + sqrt(8*idx + 1))/2)
  ccol <- idx - rrow*(rrow - 1)/2
  ans <- c(rrow, ccol)
  return(ans)
}

Try the synRNASeqNet package in your browser

Any scripts or data that you put into this service are public.

synRNASeqNet documentation built on May 2, 2019, 6:01 a.m.