R/makeannotList.R

makeAnnotList <- function(xAnnot){
  result <- list()
  for(i in 1:nrow(xAnnot)){
    result[[i]] <- xAnnot[i,2:4] 
  }
  names(result) <- xAnnot[,1]
  result
}

Try the GeneticTools package in your browser

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

GeneticTools documentation built on Jan. 15, 2017, 11:21 a.m.