From dc784df217347564b7d75cd40fc0f9d408afba7a Mon Sep 17 00:00:00 2001 From: Zhen Gao Date: Sat, 18 Feb 2017 17:36:38 -0500 Subject: [PATCH] ZG-comments-for-Gmt2GeneCat.R --- R/Gmt2GeneCat.R | 14 +++++++++----- 1 file changed, 9 insertions(+), 5 deletions(-) diff --git a/R/Gmt2GeneCat.R b/R/Gmt2GeneCat.R index 082fefb..7160112 100644 --- a/R/Gmt2GeneCat.R +++ b/R/Gmt2GeneCat.R @@ -1,13 +1,17 @@ #' Gmt2GeneCat #' #' Read a gmt file, and return a list with its name -#' being a gene id based on gene_anno_file, and each element of this list -#' being the pathways that this gene corresponds to +#' being a gene id based on gene_anno_file, and each element of this list +#' being the pathways that this gene corresponds to#' being the pathways that this gene corresponds to +####ZG +#' Read a gmt file, and return a list named by gene id from gene_anno_file, +#' and each element of this list is the pathways that this gene corresponds to +####ZG #' -#' @param gmt_input_file input file +#' @param gmt_input_file input file #### input file for somethings #' @param file.type local or url #' @param gene_anno_file annotation file -#' @param gene_anno gene annotation to be used if no annotation file +#' @param gene_anno gene annotation #### data or variable #### to be used if no annotation file #### is provided #' #' @return a list with its names being geneID, its element being the pathways #' @@ -105,4 +109,4 @@ gene2cat2 <- function(gmt_input_file, file.type) { names(gene.2.cat) <- gene.name gene.2.cat -} \ No newline at end of file +}