R/topcaBIO.PATH.R

`topcaBIO.PATH` <-
function(x, catTerm=TRUE, keepID=TRUE, ...) {
	stop("Due to termination of caBig, this function is removed in this version!")
	#if (length(grep('CABIO.PATH', [email protected])) < 1) stop(paste('The input geneAnswers categoryType is not CABIO.PATH but ', [email protected], '. stop function!'))
	#if (catTerm) {
	#	if (keepID) rownames([email protected]) <- paste(getcaBIOPATHTerms(rownames([email protected])), '::', rownames([email protected]), sep='')
	#	else rownames([email protected]) <- getcaBIOPATHTerms(rownames([email protected]))
	#}
	#return(topCategory(x, ...))	
}

Try the GeneAnswers package in your browser

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

GeneAnswers documentation built on May 2, 2018, 2:55 a.m.