Saving plots from motifStack

[sga91]

Does anybody know how to save plots generated by motifStack?

I have tried the standard way of saving plots in R but it does not work -->

jpeg('rplot.jpg')
> plot(x,y)
> dev.off()

[raytong]

Hi @sga91. I can export the plot as follow.

suppressPackageStartupMessages(library(motifStack))
pcm <- read.table(file.path(find.package("motifStack"), 
                            "extdata", "bin_SOLEXA.pcm"))
pcm <- pcm[,3:ncol(pcm)]
rownames(pcm) <- c("A","C","G","T")
motif <- new("pcm", mat=as.matrix(pcm), name="bin_SOLEXA")

jpeg('rplot.jpg')
plot(motif)
dev.off()