inst/extras/pint.Rcheck/00_pkg_src/pint/R/fit.cgh.mir.byname.R

In antagomir/pint: Pairwise INTegration of functional genomics data

fit.cgh.mir.byname <- function(X, Y, geneName, windowSize, ...){
          
          
  index <- which(rownames(X$data) == geneName)
  window <- sparse.window(X,Y,index,windowSize)
  fit.dependency.model(window$X,window$Y,...)
}