Prints the interactions in the path in a nice format.
Examples
interactions <- import_omnipath_interactions(resources=c('SignaLink3'))
OPI_g <- interaction_graph(interactions = interactions)
print_path_vs(
igraph::all_shortest_paths(
OPI_g,
from = 'TYRO3',
to = 'STAT3'
)$vpath,
OPI_g
)
#> Empty path
enzsub <- import_omnipath_enzsub(resources=c('PhosphoSite', 'SIGNOR'))
enzsub_g <- enzsub_graph(enzsub)
print_path_vs(
igraph::all_shortest_paths(
enzsub_g,
from = 'SRC',
to = 'STAT1'
)$res,
enzsub_g
)
#> Pathway 1: SRC -> STAT1