HMOX1 example added

Resources/Hipathia/resolve_aliases.R

@@ -21,11 +21,20 @@ ask_GET <- function(fask_url, verbose = F) {
   return(NULL)
 }
 
+
+
+### Example 1
+ER_sif_raw <- "https://git-r3lab.uni.lu/covid/models/-/raw/master/Executable%20Modules/SBML_qual_build/sif/ER_Stress_stable_raw.sif"
 ### Define the source diagram name
 diag_name <- "Endoplasmatic Reticulum stress"
 
-### Read in the raw SIF version (here straight from the github of Aurelien)
-raw_sif <- read.table(url("https://git-r3lab.uni.lu/covid/models/-/raw/master/Executable%20Modules/SBML_qual_build/sif/ER_Stress_stable_raw.sif"),
+### Example 2
+HMOX_sif_raw <- "https://git-r3lab.uni.lu/covid/models/-/raw/master/Executable%20Modules/SBML_qual_build/sif/HMOX1_Pathway_stable_raw.sif"
+### Define the source diagram name
+diag_name <- "HMOX1 pathway"
+
+### Read in the raw SIF version (here straight from the gitlab repo)
+raw_sif <- read.table(url(HMOX_sif_raw),
                       sep = " ", header = F, stringsAsFactors = F)
 
 ### Get MINERVA elements