Closed jmanitz closed 6 years ago
code simplified and fixed:
info <- stats::na.omit(getBM(attributes=c("start_position","end_position", "chromosome_name","hgnc_symbol"), filters=c("hgnc_symbol"), values=g, mart=ensembl)) pathways <- data.frame(pathway=x, info)
before: info$chromosome_name <- as.numeric(info$chromosome_name) info <- stats::na.omit(info) pathways <- cbind(rep(paste(x,sep=""),length(info[,1])),info)
pathway_info('hsa04020') # warning msg: In pathway_info("hsa04020") : NAs introduced by coercion
source: