## 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:
# data(RPKMS)
# 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 and do the clustering
# hlda<- InferNetworks(nets)
#
# ## return the DNA-interactions in cluster 3
# getRegionsIncluster(hlda,x,net=3)
#
# ## End(Not run)
Run the code above in your browser using DataLab