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)
}
lucgar/synRNASeqNet documentation built on May 21, 2017, 3:39 p.m.