if (FALSE) {
# Starting from an ArchR Project:
tileResults <- MOCHA::callOpenTiles(
ArchRProj = myArchRProj,
cellPopLabel = "celltype_labeling",
cellPopulations = "CD4",
TxDb = "TxDb.Hsapiens.UCSC.hg38.refGene",
OrgDb = "org.Hs.eg.db",
numCores = 1
)
}
# \donttest{
# Starting from GRangesList
if (
requireNamespace("BSgenome.Hsapiens.UCSC.hg19") &&
requireNamespace("TxDb.Hsapiens.UCSC.hg38.refGene") &&
requireNamespace("org.Hs.eg.db")
) {
tiles <- MOCHA::callOpenTiles(
ATACFragments = MOCHA::exampleFragments,
cellColData = MOCHA::exampleCellColData,
blackList = MOCHA::exampleBlackList,
genome = "BSgenome.Hsapiens.UCSC.hg19",
TxDb = "TxDb.Hsapiens.UCSC.hg38.refGene",
OrgDb = "org.Hs.eg.db",
outDir = tempdir(),
cellPopLabel = "Clusters",
cellPopulations = c("C2", "C5"),
numCores = 1
)
}
# }
Run the code above in your browser using DataLab