Building prior knowledge network (PKN) for COSMOS

Introduction

The COSMOS PKN is a combination of the following datasets:

  • Genome-scale metabolic model (GEM) from Chalmers Sysbio (Wang et al., 2021.)
  • Network of chemical-protein interactions from STITCH (http://stitch.embl.de/)
  • Protein-protein interactions from Omnipath (Türei et al., 2021)

Building the PKN is possible in by calling the cosmos_pkn() function that we present in the last section. First let’s take a closer look at each resource.

library(OmnipathR)

Chalmers Sysbio GEM

The Chalmers Sysbio group provides genome scale models of metabolism (GEMs) for various organisms: human, mouse, rat, fish, fly and worm. These models are available as Matlab files, which contain reaction data, stoichiometry matrix and identifier translation data.

The raw contents of the Matlab file can be loaded by chalmers_gem_raw(). This results in a convoluted structure of nested lists and arrays:

ch_raw <- chalmers_gem_raw()

Another function, chalmers_gem() processes the above structure into a data frame of reactions, also keeping the stoichiometry matrix and including the identifier translation data:

ch_processed <- chalmers_gem()
names(ch_processed)
## [1] "organism"       "reactions"      "metabolites"    "reaction_ids"   "metabolite_ids" "S"

The identifier translation tables are available by separate functions, chalmers_gem_metabolites() and chalmers_gem_reactions() for metabolite and reaction (and enzyme) identifiers, respectively. These return simple data frames.

ch_met <- chalmers_gem_metabolites()

ch_met
## # A tibble: 8,455 × 14
##    mets      metsNoComp metBiGGID metKEGGID metHMDBID   metChEBIID  metPubChemID metLipidMapsID metEHMNID
##    <chr>     <chr>      <chr>     <chr>     <chr>       <chr>              <dbl> <chr>          <chr>    
##  1 MAM00001c MAM00001   carveol   C00964    <NA>        CHEBI:15389           NA <NA>           <NA>     
##  2 MAM00001e MAM00001   carveol   C00964    <NA>        CHEBI:15389           NA <NA>           <NA>     
##  3 MAM00002c MAM00002   appnn     C09880    HMDB0006525 CHEBI:36740         6654 <NA>           <NA>     
##  4 MAM00002e MAM00002   appnn     C09880    HMDB0006525 CHEBI:36740         6654 <NA>           <NA>     
##  5 MAM00003c MAM00003   <NA>      <NA>      <NA>        CHEBI:78990           NA LMFA01030283   <NA>     
##  6 MAM00003l MAM00003   <NA>      <NA>      <NA>        CHEBI:78990           NA LMFA01030283   <NA>     
##  7 MAM00003r MAM00003   <NA>      <NA>      <NA>        CHEBI:78990           NA LMFA01030283   <NA>     
##  8 MAM00003e MAM00003   <NA>      <NA>      <NA>        CHEBI:78990           NA LMFA01030283   <NA>     
##  9 MAM00004c MAM00004   <NA>      <NA>      <NA>        <NA>                  NA <NA>           <NA>     
## 10 MAM00004m MAM00004   <NA>      <NA>      <NA>        <NA>                  NA <NA>           <NA>     
## # ℹ 8,445 more rows
## # ℹ 5 more variables: metHepatoNET1ID <chr>, metRecon3DID <chr>, metMetaNetXID <chr>, metHMR2ID <chr>,
## #   metRetired <chr>

The metabolite identifier translation available here is also integrated into the package’s translation service, available by the translate_ids and other functions.

translate_ids('MAM00001', 'metabolicatlas', 'recon3d', chalmers = TRUE)

Finally, the chalmers_gem_network() function uses all above data to compile a network binary chemical-protein interactions. By default Metabolic Atlas identifiers are used for the metabolites and Ensembl Gene IDs for the enzymes. These can be tranlated to the desired identifiers using the metabolite_ids and protein_ids arguments. Translation to multiple identifers is possible. The ri or record_id column in case of the Chalmers GEM represent the reaction ID, a unique identifier of the original reaction. One reaction yields many binary interactions as it consists of a number of gene products, reactants and products. The column ci means “complex ID”, it is a unique identifier of groups of enzymes required together to carry out the reaction. The column reverse indicates if the row is derived from the reversed version of a reversible reaction. The column transporter signals reactions where the same metabolite occures both on reactant and product side, these are assumed to be transport reactions. In the Chalmers GEM the reactions are also assigned to compartments, these are encoded by single letter codes in the comp column. In the original data the compartment codes are postfixes of the metabolite IDs, here we move them into a separate column, leaving the Metabolic Atlas IDs clean and usable.

ch <- chalmers_gem_network()

ch

STITCH enzyme-metabolite interactions

STITCH is a large compendium of binary interactions between proteins and chemicals. Some of these are derived from metabolic reactions. Various attributes such as mode of action, effect sign and scores are assigned to each link. The datasets are available by organism, stored in “actions” and “links” tables, available by the stitch_actions() and stitch_links() functions, respectively. STITCH supports a broad variety of organisms, please refer to their website at (https://stitch.embl.de/).

sta <- stitch_actions()

sta
stl <- stitch_links()

stl

stitch_network() combines the actions and links data frames, filters by confidence scores, removes the prefixes from identifiers and translates them to the desired ID types. STITCH prefixes Ensembl Protein IDs with the NCBI Taxonomy ID, while PubChem CIDs with CID plus a lowercase letter “s” or “m”, meaning stereo specific or merged stereoisomers, respectively. These prefixes are removed by default by the stitch_remove_prefixes() function. Effect signs (1 = activation, -1 = inhibition) and combined scores are aslo included in the data frame. Similarly to Chalmers GEM, translation of chemical and protein identifiers is available. The record_id column uniquely identifies the original records. Multiple rows with the same record_id are due to one-to-many identifier translation.

st <- stitch_network()

st

OmniPath signaling network

All parameters supported by the OmniPath web service (omnipath()) can be passed to omnipath_for_cosmos(), enabling precise control over the resources, interaction types and other options when preparing the signaling network from OmniPath. By default the “omnipath” dataset is included which contains high confidence, literature curated, causal protein-protein interactions. For human, mouse and rat, orthology translated data is retrieved from the web service, while for other organisms translation by orthologous gene pairs is carried out client side.

op <- omnipath_for_cosmos()

op
## # A tibble: 138,490 × 8
##    source target  sign record_id uniprot_source uniprot_target genesymbol_source genesymbol_target
##    <chr>  <chr>  <dbl>     <int> <chr>          <chr>          <chr>             <chr>            
##  1 P0DP23 P48995    -1         1 P0DP23         P48995         CALM1             TRPC1            
##  2 P0DP25 P48995    -1         2 P0DP25         P48995         CALM3             TRPC1            
##  3 P0DP24 P48995    -1         3 P0DP24         P48995         CALM2             TRPC1            
##  4 Q03135 P48995     1         4 Q03135         P48995         CAV1              TRPC1            
##  5 P14416 P48995     1         5 P14416         P48995         DRD2              TRPC1            
##  6 Q99750 P48995    -1         6 Q99750         P48995         MDFI              TRPC1            
##  7 Q14571 P48995     1         7 Q14571         P48995         ITPR2             TRPC1            
##  8 P29966 P48995    -1         8 P29966         P48995         MARCKS            TRPC1            
##  9 Q13255 P48995     1         9 Q13255         P48995         GRM1              TRPC1            
## 10 Q13586 P48995     1        10 Q13586         P48995         STIM1             TRPC1            
## # ℹ 138,480 more rows

Complete build

Building the complete COSMOS PKN is done by cosmos_pkn(). All the resources above can be customized by arguments passed to this function. With all downloads and processing the build might take 30-40 minutes. Data is cached at various levels of processing, shortening processing times. With all data downloaded and HMDB ID translation data preprocessed, the build takes 3-4 minutes; the complete PKN is also saved in the cache, if this is available, loading it takes only a few seconds.

pkn <- cosmos_pkn()

pkn

The record_id column identifies the original records within each resource. If one record_id yields multiple records in the final data frame, it is the result of one-to-many ID translation or other processing steps. Before use, it is recommended to select one pair of ID type columns (by combining the preferred ones) and perform distinct by the identifier columns and sign. After the common columns, resource specific columns are labeled with the resource name; after these columns, molecule type and side specific identifer columns are named after the ID type and the side of the interaction (“source” vs. “target”).

Session information

sessionInfo()
## R version 4.4.2 (2024-10-31)
## Platform: x86_64-pc-linux-gnu
## Running under: Ubuntu 24.04.1 LTS
## 
## Matrix products: default
## BLAS:   /usr/lib/x86_64-linux-gnu/openblas-pthread/libblas.so.3 
## LAPACK: /usr/lib/x86_64-linux-gnu/openblas-pthread/libopenblasp-r0.3.26.so;  LAPACK version 3.12.0
## 
## locale:
##  [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C               LC_TIME=en_US.UTF-8       
##  [4] LC_COLLATE=C               LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8   
##  [7] LC_PAPER=en_US.UTF-8       LC_NAME=C                  LC_ADDRESS=C              
## [10] LC_TELEPHONE=C             LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       
## 
## time zone: Etc/UTC
## tzcode source: system (glibc)
## 
## attached base packages:
## [1] stats     graphics  grDevices utils     datasets  methods   base     
## 
## other attached packages:
## [1] Matrix_1.7-1     OmnipathR_3.15.0 BiocStyle_2.35.0
## 
## loaded via a namespace (and not attached):
##  [1] xfun_0.49           bslib_0.8.0         lattice_0.22-6      tzdb_0.4.0          vctrs_0.6.5        
##  [6] tools_4.4.2         generics_0.1.3      parallel_4.4.2      curl_6.0.1          tibble_3.2.1       
## [11] RSQLite_2.3.9       blob_1.2.4          pkgconfig_2.0.3     R.oo_1.27.0         checkmate_2.3.2    
## [16] readxl_1.4.3        lifecycle_1.0.4     compiler_4.4.2      stringr_1.5.1       progress_1.2.3     
## [21] htmltools_0.5.8.1   sys_3.4.3           buildtools_1.0.0    sass_0.4.9          yaml_2.3.10        
## [26] later_1.4.1         pillar_1.10.0       crayon_1.5.3        jquerylib_0.1.4     tidyr_1.3.1        
## [31] R.utils_2.12.3      cachem_1.1.0        tidyselect_1.2.1    rvest_1.0.4         zip_2.3.1          
## [36] digest_0.6.37       stringi_1.8.4       dplyr_1.1.4         purrr_1.0.2         maketools_1.3.1    
## [41] grid_4.4.2          fastmap_1.2.0       cli_3.6.3           logger_0.4.0        magrittr_2.0.3     
## [46] utf8_1.2.4          XML_3.99-0.17       readr_2.1.5         withr_3.0.2         prettyunits_1.2.0  
## [51] backports_1.5.0     rappdirs_0.3.3      bit64_4.5.2         lubridate_1.9.4     timechange_0.3.0   
## [56] rmarkdown_2.29      httr_1.4.7          igraph_2.1.2        bit_4.5.0.1         R.matlab_3.7.0     
## [61] cellranger_1.1.0    R.methodsS3_1.8.2   hms_1.1.3           memoise_2.0.1       evaluate_1.0.1     
## [66] knitr_1.49          rlang_1.1.4         Rcpp_1.0.13-1       glue_1.8.0          DBI_1.2.3          
## [71] selectr_0.4-2       BiocManager_1.30.25 xml2_1.3.6          vroom_1.6.5         jsonlite_1.8.9     
## [76] R6_2.5.1