if (FALSE) {
fpath <- system.file("extdata", "fragments.tsv.gz", package="Signac")
Fragments(atac_small) <- CreateFragmentObject(
path = fpath,
cells = colnames(atac_small),
tolerance = 0.5
)
TSSEnrichment(object = atac_small)
}
Run the code above in your browser using DataLab