plotMotifOverMotif.Rdplot motif over another motif to emphesize the difference.
plotMotifOverMotif( motif, backgroundMotif, bgNoise = NA, font = "Helvetica-Bold", textgp = gpar() )
| motif | |
|---|---|
| backgroundMotif | |
| bgNoise | if it is not NA, test will using a background by Dirichlet(1)-distributed random frequencies with weight bg.noise. The value of bgNoise should be a number in the range of 0 to 1, eg. 0.05 |
| font | font for logo symbol |
| textgp | text parameter |
none
pcms <- readPCM(file.path(find.package("motifStack"), "extdata"),"pcm$") len <- sapply(pcms, function(.ele) ncol(.ele$mat)) pcms <- pcms[len==7] plotMotifOverMotif(pcms[[1]], pcms[[2]], bgNoise=0.05)