Nothing
## ---- echo = FALSE------------------------------------------------------------
knitr::opts_chunk$set(
eval=FALSE
)
## -----------------------------------------------------------------------------
# if(!"RCy3" %in% installed.packages()){
# install.packages("BiocManager")
# BiocManager::install("RCy3")
# }
# library(RCy3)
#
# if(!"ndexr" %in% installed.packages()){
# install.packages("BiocManager")
# BiocManager::install("ndexr")
# }
# library(ndexr)
## -----------------------------------------------------------------------------
# ndexcon <- ndex_connect()
## -----------------------------------------------------------------------------
# networks <- ndex_find_networks(ndexcon, "Breast Cancer")
# print(networks[,c("name","externalId","nodeCount","edgeCount")])
## -----------------------------------------------------------------------------
# networks <- ndex_find_networks(ndexcon, "BRCA")
# print(networks[,c("name","externalId","nodeCount","edgeCount")])
## -----------------------------------------------------------------------------
# networkId = networks$externalId[1]
# network = ndex_get_network(ndexcon, networkId)
# print(network)
## -----------------------------------------------------------------------------
# brca.net.suid <- importNetworkFromNDEx(networkId)
## -----------------------------------------------------------------------------
# ig2 <- makeSimpleIgraph()
# net.suid <- createNetworkFromIgraph(ig2, 'Simple Network', 'Simple Collection')
## -----------------------------------------------------------------------------
# user <- "your_NDEx_account_username" #replace with your info
# pass <- "your_NDEx_account_password" #replace with your info
# exportNetworkToNDEx(user, pass, isPublic=TRUE, network=net.suid)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.