# input as HiTC::HTCexp object
if (FALSE) {
if (require("HiTC", quietly = TRUE)) {
load(system.file("extdata", "hic_imr90_40_XX.rda", package = "adjclust"))
res1 <- hicClust(hic_imr90_40_XX)
}
}
# input as Matrix::dsCMatrix contact map
if (FALSE) {
mat <- HiTC::intdata(hic_imr90_40_XX)
res2 <- hicClust(mat)
}
# input as text file
res3 <- hicClust(system.file("extdata", "sample.txt", package = "adjclust"))
Run the code above in your browser using DataLab