FindPathwayToCsv:

In cherkaos/MetabToPathways: Query metabolites to find their pathways, for multiple databases (Kegg, SMPDB, HMDB and Biocyc)

Usage

FindPathwayToCsv(puchem, name, kegg)

Arguments

puchem
name
kegg

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (puchem, name, kegg) 
{
    result <- FindPathway(puchem, name, kegg)
    for (i in 1:dim(result)[2]) {
        result[, i]$KeggPathway <- paste(result[, i]$KeggPathway, 
            collapse = "__")
        result[, i]$SmpdbPathway <- paste(result[, i]$SmpdbPathway, 
            collapse = "__")
        result[, i]$HmdbPathway <- paste(result[, i]$HmdbPathway, 
            collapse = "__")
        result[, i]$BiocycPathway <- paste(result[, i]$BiocycPathway, 
            collapse = "__")
    }
    write.csv(t(as.matrix(result)), "result.csv", row.names = TRUE, 
        col.names = FALSE)
  }

cherkaos/MetabToPathways documentation built on May 13, 2019, 3:54 p.m.