R/import_kegg.R

In delfarahalireza/calcyt: What the Package Does (One Line, Title Case)

#' KEGG to Cytoscape
#'
#' Import a KEGG pathway to Cytoscape, Cytoscape needs to be open for this function to work
#'
#' @param x KEGG pathway ID
#'
#' @return import pathway x to Cytoscape as a network
#' @export
#'
#' @examples
#' x <- 'ko00010'
#' import_kegg(x)
import_kegg <- function(x)
{
  browseURL(paste('http://localhost:1234/keggscape/v1', x, sep="/", collapse=NULL), browser = getOption("browser"),
            encodeIfNeeded = FALSE)
}