if (FALSE) {
library(JASPAR2018)
library(TFBSTools)
library(BSgenome.Hsapiens.UCSC.hg19)
pwm <- getMatrixSet(
x = JASPAR2018,
opts = list(species = 9606, all_versions = FALSE)
)
motif.matrix <- CreateMotifMatrix(
features = granges(atac_small),
pwm = pwm,
genome = BSgenome.Hsapiens.UCSC.hg19
)
}
Run the code above in your browser using DataLab