if(require("PWMEnrich.Dmelanogaster.background")){
data(MotifDb.Dmel.PFM)
ttk = MotifDb.Dmel.PFM[["ttk"]]
PWMUnscaled(ttk, id="ttk-JASPAR", name="ttk") # make a PWM with uniform background
PWMUnscaled(ttk, id="ttk-JASPAR", name="ttk", prior.params=c("A"=0.2, "C"=0.3, "G"=0.3, "T"=0.2)) # custom background
prior = getBackgroundFrequencies("dm3", quick=TRUE) # get background for drosophila (quick mode on a reduced dataset)
PWMUnscaled(ttk, id="ttk-JASPAR", name="ttk", prior.params=prior) # convert using genomic background
}
Run the code above in your browser using DataLab