## Not run:
#
# ### Integrate lncRNAs of competitive regulation into KEGG pathway graphs ###
# #LncGenePairs<-GetExampleData(exampleData="LncGenePairs")
# #inteUMGraph<-getInteUMGraph(LncGenePairs)
# ### get user-interested lncRNAs and genes sets.
# geneLnc<-GetExampleData(exampleData="geneLnc")
# # get locate subpathways.
# #sub<-getLocSubGraphLnc(geneLnc,interUMGraph,type="gene_lncRNA",n=1,s=8)
# sub<-GetExampleData(exampleData="sub")
# SubcodeLncResult<-identifyLncGraphW(geneLnc,sub,type="gene_lncRNA",bet=1)
# ## End(Not run)
Run the code above in your browser using DataLab