seek the metabolits' pathway
Examples
name <- c("2-Hydroxybutyric acid","1-Methyladenosine","tt")
result_all <- name2pathway(name)
#> Warning: cannot remove file 'test.data.1', reason 'No such file or directory'
#> Start at 2026-08-31 15:15:24.099531
#>
#> Warning: one argument not used by format '
#> #######################################################'
#>
#> #######################################################
#> 'xEnricher' is being called (2026-08-31 15:15:24.104774):
#> Warning: one argument not used by format '#######################################################'
#> #######################################################
#> First, generate a subgraph induced (via 'all_paths' mode) by the annotation data (2026-08-31 15:15:24.107434) ...
#> Next, prepare enrichment analysis (2026-08-31 15:15:24.130706) ...
#> There are 1 genes/SNPs of interest tested against 3217 genes/SNPs as the background (annotatable only? TRUE) (2026-08-31 15:15:24.13301)
#> Third, perform enrichment analysis using 'hypergeo' test (2026-08-31 15:15:24.143552) ...
#> There are 83 terms being used, each restricted within [1,2000] annotations
#> Last, adjust the p-values for 83 terms (with 0 minimum overlaps) using the BH method (2026-08-31 15:15:24.187249) ...
#> Warning: one argument not used by format '#######################################################'
#> #######################################################
#> 'xEnricher' has been finished (2026-08-31 15:15:24.260081)!
#> Warning: one argument not used by format '#######################################################
#> '
#> #######################################################
#>
#> End at 2026-08-31 15:15:24.262455
#> Runtime in total (xEnricherYours): 0 secs
#> Warning: Expected 1 pieces. Additional pieces discarded in 2857 rows [1, 2, 3, 4, 5, 6,
#> 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 19, 20, 22, 24, ...].
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Expected 1 pieces. Additional pieces discarded in 2857 rows [1, 2, 3, 4, 5, 6,
#> 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 19, 20, 22, 24, ...].
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
#> Warning: Unknown or uninitialised column: `kegg_id`.
result <- result_all$name2pathway
pathway <- result_all$pathway
pathway
#> # A tibble: 1 × 16
#> name nAnno nOverlap fc zscore pvalue adjp or CIl CIu distance
#> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <chr>
#> 1 Propanoat… 42 1 76.6 8.69 0 0 Inf 1.94 Inf 1
#> # ℹ 5 more variables: namespace <chr>, members_Overlap <chr>,
#> # members_Anno <chr>, members_Overlap_name <chr>, members_Anno_name <chr>
kegg_name <- result_all$kegg_name
kegg_name
#> NULL