path <- system.file("exdata", package = "TopDom", mustWork = TRUE)
## Original count data
chr <- "chr19"
pathname <- file.path(path, sprintf("nij.%s.gz", chr))
data <- readHiC(pathname, chr = chr, binSize = 40e3)
print(data)
str(data)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.