## get the different datasets path
    petFile <- file.path(system.file("example",package="R3CPET"),"HepG2_interactions.txt")  
    tfbsFile <- file.path(system.file("example",package="R3CPET"),"HepG2_TF.txt.gz")  
## Not run: 
#     x <- ChiapetExperimentData(pet = petFile, tfbs=  tfbsFile, IsBed = FALSE, ppiType="HPRD", filter= TRUE) 
#     ## build the different indexes
#     x <- createIndexes(x)
#     ## build networks connecting each interacting regions
#     nets<- buildNetworks(x)
# 
#     ## infer the networks
#     hlda<- InferNetworks(nets)
#     hlda
# ## End(Not run)
Run the code above in your browser using DataLab